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ATAR1 1040  STf 

Concerto  per  computer  e  orchestra. 


Prima  non  c'era.  Adesso  c'è.  È  il  nuovo  Atari  1040STf,  la  risposta 
Atari  ai  Personal  che  si  facevano  forti  solo  del  prezzo.  Ma  oggi  tutti  i  musi¬ 
cisti  possono  avere  un  computer  serio  a  un  prezzo  da  ridere.  Infatti  il 
1040STf  ti  offre  di  serie  le  porte  MIDI  IN  e  MIDI  OUT,  1  milione  di  Bytes  di 
memoria,  il  Mouse,  e  una  montagna  di  programmi  per  applicazioni  musicali 
professionali  con  i  quali  il  1040  diventa  sequencer,  campionatore,  sound  edi¬ 
tor,  gestore  di  missaggi  computerizzati,  sistema  di  notazione  professionale  e 
molte  altre  cose  ancora.  E  tutto  questo  a  molto  meno  di  quanto  oseresti  pen¬ 
sare.  Solo  Ut  1.290.000*  con  monitor  b/n,  Ut  1.540.000*  con  monitor 
a  colori.  Insomma,  solo  i  suonati  non  suoneranno  con  Atari.  Ti  aspettia¬ 
mo  nei  migliori  negozi  di  strumenti  musicali. 

'IVA  esclusa 

Il  computer  comprende  le  seguenti  specifiche:  1024  Kb  RAM, 
192  Kb  ROM,  microprocessore  Motorola  68.000,16/32  bit,  Disk-drive  da 
720  KB  (formattati).  Interfacce:  seriale,  parallela,  Mouse,  Joystick,  floppy 
disk,  hard  disk,  MIDI. 

Distributori  italiani  di  software  musicale  per  Atari  1040  Stf: 

•  MUSIC  POOL  -  Via  Archimede,  22  -  20124  Milano  -  Tel.  02-7386517: 

MIDISOFT  STUDIO  della  Passport  Designs;  SUPERSCORE  e  MA- 

STERPIECE  della  SONUS.  •  GRISBY  MUSIC.  Via  delle  Industrie,  4  -Ca- 


stelfidardo  -  Tel.  071-781714:  AKAI  S  900  EDITOR  della  GEERDES.  • 
MACK  SRL,  Via  Tiburtina,  364  -  00159  Roma  -  Tel.  06-431704:  EZ- 

TRACK,  SYNCTRACK,  SMPTETRACK,  DX  ANDROID,  CZ  AN- 
DROID,  GENPATCH  MIDI  UTILITY  e  ADAP  della  HYBRID  ARTS.  •  Ml- 
DIWARE  -  Via  Parioli,  101/C  -  00197  Roma  -  Tel.  06-802990:  PRO  24, 
PRO  CREATOR,  MASTER  SCORE,  SOUND  WORKS  MIRAGE  della 
Steinberg;  SEQUENCER,  BANK  MANAGER,  SOUND  EDITOR,  SOUND 
CREATOR  e  X  NOTES  della  BEAM  TEAM  •  MUSIC  TECHNOLOGY  SRL  - 


Via  Colombi,  12  -  20161  Milano  -  Tel.  02-646.34.61:  KEYBOARD  CON- 
TROLLED  SEQUENCER.  MIDI  RECORDING  STUDIO,  THE  COPYST, 
DX  HEAVEN,  editor  per  LEXICON  PCM  70,  KAWAI K3,  FB  01,  MATRIX 

6,  tutta  la  serie  DX  YAMAHA,  CASIO  CZ  della  DR  T’S.  • 
MIDI  MUSIC  S.A.S.-Via  Cherubini,  22-10154  Torino  - 
Tel.  011/237612:  sequencer  CREATOR  e  X-ALYZER 


della  C  LAB 


AATARr 


Atari  Italia  S.p.A.  •  Via  dei  Lavoratori  25  ■  20092  Cinisello  Balsamo  (MI) 
Tel.  02-6120851  -  Tlx  325832  FAX  6128985 
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HARDWARE 

ComputerEyes 
di  Emanuele  Bergamini 

Per  sfruttare  a  fondo  le 
capacità  grafiche  degli 
Atari  8  bit,  e  dopo  averlo 
provato  per  la  serie  ST, 
ecco  il  digitalizzatore. 
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TIPS  &  TRICKS 

di  Mauro  Pavone 
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A  SCUOIA  DI  RASIC 

Concatenamento  di 
programmi 

di  Emanuele  Bergamini 

Un  modo  semplice  e 


funzionale  per  scrivere 
programmi  concatenati  con 
il  Basic  Atari. 
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SOFTWARE 

XPong 

Una  routine  in  linguaggio 
macchina  per  dare  un 
tocco  di  classe  ai  vostri 
programmi  e  un  divertente 
mini-gioco. 
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SOFIWARE 

Fractal  Maker 
di  Emanuele  Bergamini 

Un  programma  in  Basic  per 
rappresentare  graficamente 
la  geometria  frattale  con 
effetti  sorprendenti:  è 
sufficiente  copiare  il  listato 
e  poi  aspettare. 


PROVA 

HARDWARE 
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SOFTWARE 

DB  Man 

di  Matteo  Prinetti 

Un  linguaggio  di 
programmazione  per  la 
gestione  dei  dati. 
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COMUNICAZIONE 

L'informazione  corre  sul 
filo 

di  Paolo  Galvani 

Per  collegarsi  via  telefono  si 
pone  sempre  molta 
attenzione  al  modem,  ma 
quasi  mai  ai  programmi. 
Quattro  pacchetti  di 
comunicazione,  di  cui  due 
emulatori  di  terminale,  sul 
banco  di  prova. 


30 

LINGUAGGI 

Pascal  68000 
di  Andrea  Borroni 

Con  Metacomco  Pascal  si 
superano  tutte  le  limitazioni 
imposte  da  altri  compilatori 
con  innegabili  vantaggi  per 
la  grafica  e  il  calcolo. 

32 

TECNICA 

Uso  e  abuso  di  un  floppy 
disk 

di  Roberto  Cazzaro 

Continua  il  rapido  corso  in 
C  sulla  struttura  e  il 
funzionamento  dei  drive 
Atari. 

36 

SOFTWARE 

Boffin:  scrivere  senza  limiti 
di  Mauro  Scaioni 

Un  potente  ed  evoluto 
word  processor  che 
consente  anche  la 
costruzione  e  l'inserimento 
di  immagini  e  grafici  nel 
testo:  quasi  un  page 
processor. 

40 

PROGRAMMAZIONE 

I  segreti  del  GEM 
di  Dario  Bressanini 

Impariamo  a  programmare 
in  GEM,  ovvero  a  utilizzare 
le  routine  contenute  nella 
ROM  del  computer  ed 
implementare  così  i  menu 
pull-down  nei  vostri 
programmi. 

48 

SOFTWARE 

Aegis  Animator: 
animazione  facile 
di  Paolo  Galvani 

Un  incredibile  programma 
di  animazione  adatto  a  chi 
vuole  ottenere  immagini  in 
movimento  facilmente  ed  in 
brevissimo  tempo. 

50 

SOFTWARE 

Busigraf 

di  Marcello  Morchio 

Un'alternativa  ai  costosi 
programmi  di  business 
graphics  scritto  in  Atari 
Basic  e  pronto  da  digitare. 
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JACKSON 


Informatica  Oggi  Settimanale  è  il 
news  magazine  Jackson 
caratterizzato  da  una  formula 
assolutamente  innovativa,  studiata 
per  offrire  ad  ogni  utente,  oltre 
alle  notizie  di  interesse  generale, 
un  servizio  settimanale  dedicato  al 
suo  specifico  “mondo”  operativo. 
Non  solo.  Informatica  Oggi 
Settimanale  è  anche  l’unità 
centrale  del  nuovo  Sistema 
Informativo  Multimedia  (SM) 
Jackson  che  comprende  strumenti 
di  lavoro  cartacei,  telematici  ed 
ottici  per  garantire  il  più  efficace 
accesso  alle  informazioni  del 
settore. 

GRUPPO  EDITORIALE 


DIVISIONE  PERIODICI 


Oltre  a  Informatica  Oggi  Settimanale, 
il  Sistema  Informativo 
Multimedia  SM  Jackson  comprende 


Informatica  Oggi 
Mensile 

Articoli  tecnici  e 
“servizi  speciali’’  per 
l’approfondimento 
delle  tecnologie  e  delle 
applicazioni. 

Tutti  i  mesi  in  edicola 
o  in  abbonamento. 


Informatica  Oggi 
Online  News  Service 

Informazione  in  tempo 
reale  sui  maggiori 
avvenimenti  del 
settore,  dibattiti 
interattivi  e  tele¬ 
interviste  con  esperti 
del  settore. 

Tutti  i  giorni  a  partire 
da  settembre  ’87. 


Informatica  Oggi 
On-line 
News  Service 


P.C.  World 
Magazine,  Bit, 
Trasmissione  Dati 
e  Telecomunicazioni 

Riviste  dedicate  ai 
sistemi  MS-DOS,  ai 
personal  computer  e 
alla  telematica. 

Tutti  i  mesi  in  edicola 
o  in  abbonamento. 


Guide  Jackson 
Hardware  e  Software 

La  catalogazione  più 
completa  ed  aggiornata 
di  tutti  i  prodotti 
hardware  e  software. 
Ogni  sei  mesi  a  partire 
da  settembre  ’87. 


Guide  Jackson 


Hardware  e  Software 


Guida  On-line  Jackson 
Hardware  e  Software 

La  banca  dati  più 
completa  ed  aggiornata 
di  tutti  i  prodotti 
hardware  e  software  e 
dei  loro  fornitori  con 
un  servizio  integrato  di 
richiesta  informazioni. 
Tutti  i  giorni  a  partire 
da  settembre  ’87. 


Guida  On-line 

Jackson 
Hardware  e  Software 


Guida  CD-ROM 
Jackson  Hardware 
e  Software 

Una  banca  dati  su 
Compact  Disc  ROM  di 
tutti  i  prodotti 
hardware  e  software  e 
dei  loro  fornitori. 

Entro  fine  ’87. 
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EDITORIALE 

OO  L’ATTESA  HA  ORMAI  RISCALDATO  GLI  ANIMI,  E  NON  SI  CONTANO  LE  TELEFONATE  E 
LE  LETTERE  CHE  SOMMERGONO  LA  REDAZIONE  ALLA  RICERCA  DI  INFORMAZIONI 
SULLE  NOVITÀ  IN  ARRIVO.  LE  NUOVE  MACCHINE  PRESENTATE  DA  ATARI  ITALIA  AL 
SIOA  DI  BOLOGNA  HANNO  SCATENATO  L'ENTUSIASMO  DEGLI  ATARIANI  E  L’INVIDIA 

■  DELLA  CONCORRENZA.  L’APERTURA  DI  ATARI  AL  MONDO  MS-DOS,  LO  STANDARD 

INDUSTRIALE  NEL  CAMPO  DEI  PERSONAL  COMPUTER  PER  L’OFFICE  AUTOMATION, 
È  SICURAMENTE  UN  FATTO  IMPORTANTE,  CONFERMATO  DALL’INTERESSE  CHE  GLI 
OPERATORI  DEL  SETTORE  E  IL  PUBBLICO  HANNO  MOSTRATO  DOPO  GLI  ANNUNCI 
DELL’ATARI  PC.  CHI  TEME  CHE  LA  RIVISTA  DI  ATARI  SI  TRASFORMI  IN  UN  PERIODICO 
PER  PC  IBM  E  COMPATIBILI  SI  TRANQUILLIZZI:  LO  SPAZIO  DEDICATO  AL  NUOVO 
MONDO  IN  CUI  ATARI  È  ENTRATA  DI  PREPOTENZA  SARÀ  LIMITATO  ALL’ESSENZIALE. 
LARGO  AGLI  ST,  DUNQUE,  DA  MEZZO  MEGA  IN  SU! 


Diego  Biasi 
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Vi  scrivo  per  ringraziar¬ 
vi  di  aver  realizzato 
“La  Rivista  di  Atari”, 
indispensabile  strumento  per 
la  crescita  e  la  diffusione  di 
un  personal  computer  ecce¬ 
zionale  come  il  nostro  ST. 
Vorrei  chiedervi  se  pensate 
di  realizzare  una  rubrica  co¬ 
me  “Bitborsa”  di  Bit,  indi¬ 
spensabile  per  permettere  al- 
l’Atariano  di  contattare  altri 
colleghi  per  scambio  di  infor¬ 
mazioni  su  hardware  e  so¬ 
ftware. 

Per  quanto  riguarda  il  que¬ 
stionario  di  pagina  35  del  n. 
1,  vi  rispondo  (non  utilizzo  il 
tagliando  per  non  rovinare  la 
Rivista)  che  il  giornale  è  sod¬ 
disfacente,  anche  se  a  mio 
parere  manca  una  rubrica 
prettamente  hardware  per  gli 
“smanettoni”  come  me. 
Complimenti  ed  auguri  per  la 
rivista  che  spero  diventi  pre¬ 
sto  mensile!! 

Fabio  Micheioni 
Roma 

Innanzitutto  grazie  per  gli 
elogi ,  che  ci  spronano  a  fare 
sempre  meglio. 

E  grazie  anche  per  i  numero¬ 
si  suggerimenti:  migliorere¬ 
mo  con  la  vostra  collabora¬ 
zione.  Venendo  alla  tua  do¬ 
manda  non  possiamo  che  ri¬ 
sponderti:  mandate  i  vostri 
annunci,  e  appena  ne  avremo 
un  numero  sufficiente  orga¬ 
nizzeremo  una  rubrica  simile 
a  “Bitborsa".  Dubitiamo  pe¬ 
rò  che  ne  arriveranno  molti: 
chi  ha  un  Atari  se  lo  tiene! 
Scherzi  a  parte ,  il  tuo  annun¬ 
cio  è  già  stato  messo  in  lista 
per  una  prossima  pubblica¬ 
zione  che  avverrà  appena 
possibile. 

Prevedere  se  “La  Rivista  di 
Atari"  diverrà  mensile  è  un 
po'  presto,  però  vista  l'entu¬ 
siastica  risposta  che  le  avete 
riservato  studieremo  la  pro¬ 
posta.  . . 


pettabile  Redazione, 
innanzitutto  vorrei  farvi 
i  complimenti  per  la  vo¬ 
stra  Rivista,  che  mi  soddisfa 
ampiamente.  Ma  veniamo  al 
dunque. 

Sono  un  utente  Atari  posses¬ 
sore  di  un  130  XE  da  più  di 
un  anno.  In  questo  periodo 
ho  imparato  ad  usarlo  e  mi 
diletto  a  scrivere  programmi, 
ma,  contemporaneamente, 
mi  sono  messo  alla  ricerca  di 
negozi  che  vendessero  delle 
utility  per  il  mio  computer. 
Devo  però  ammettere  con 
delusione  che  non  sono  riu¬ 
scito  a  trovarne.  A  questo 
proposito  vi  pregherei  di  in¬ 
dicarmi  alcuni  rivenditori 
della  mia  zona. 

Dato  che  il  mio  computer  uti¬ 
lizza  come  memoria  esterna 
un  disk  drive,  vorrei  chieder¬ 
vi  se  esistono  o  sono  in  pro¬ 
gramma  libri  accompagnati 
da  disco. 

Distinti  saluti. 

Francesco  Rizzi 
Pasian  di  Prato  (UD) 

I  rivenditori  Atari  della  tua 
zona  li  puoi  trovare  nelle  pa¬ 
gine  in  fondo  alla  Rivista. 
Per  tua  comodità  riportiamo 
gli  indirizzi  dei  negozi  pre¬ 
senti  in  Udine: 

-  Il  giocattolo  '2,  Via  Merca¬ 
to  Vecchio  29 

-  Mofert  sne,  Via  Europa 
Unita  41 

Per  quanto  riguarda  libri  con 
allegati  dischi  per  l' Atari 
130XE,  per  ora  non  è  previ¬ 
sto  nulla  di  simile.  Se  doves¬ 
simo  registrare  qualche  novi¬ 
tà,  ne  daremo  notizia  sulle 
pagine  della  Rivista. 

Accidenti,  vi  siete  decisi 
finalmente  a  fare  una 
rivista  tuttAtari  per  i 
possessori  di  questi  non  trop¬ 
po  fortunati  computer  qui  in 
Italia.  La  Rivista  in  sè  stessa 
non  è  affatto  male  (come  im¬ 


postazione  assomiglia  un  po’ 
al  vecchio  e  glorioso  Video¬ 
giochi  &  Computer)  anche 
se,  come  avete  detto  voi,  an¬ 
drebbero  ampliate  le  pagine 
riguardanti  le  prove  dei  vi- 
deogames  e  i  listati. 

Per  le  prove  HW,  perché  in¬ 
vece  di  provare  un  solo  pro¬ 
dotto  non  fate  il  confronto 
con  lo  stesso  accessorio  ma 
per  altri  computer? 

Spero  anche  che  vogliate  in¬ 
serire  uno  spazio  per  le  gare 
dei  computer  da  casa  (XE, 
XL,  ST  e,  perché  no, 
2600VCS)  che  in  un  giornale 
come  il  vostro  a  mio  avviso 
non  possono  mancare. 

Mi  è  piaciuto  moltissimo  il 
servizio  del  club  di  Monza 
dove  non  si  copiano  pro¬ 
grammi,  ma  si  impara  a  pro¬ 
grammare  sul  serio  e  ad  usare 
il  computer  come  mezzo  so¬ 
ciale  per  conoscersi  e  scam¬ 
biare  idee.  Purtroppo  io  abi¬ 
to  in  Toscana,  per  cui  penso 
che  non  avrò  mai  la  possibili¬ 
tà  di  partecipare  ad  una  riu¬ 
nione  di  “Artigiani”. 

In  questi  ultimi  tempi  non  ho 
trovato  praticamente  nessun 
programma  nuovo  in  giro, 
anche  se  case  distributrici  di 
soft  (Lago  e  Mastertronic) 
avevano  preannunciato 
un’immissione  di  nuovi  pro¬ 
grammi  sul  mercato,  cosa  pe¬ 
rò  che  a  quanto  vedo  tarda  ad 
accadere.  Perché  questi  ri¬ 
tardi? 

Con  questo  concludo  la  mia 
missiva  che  vuol  essere  un 
elogio  al  vostro  coraggioso 
lavoro  ed  uno  sprone  a  tutti  i 
possessori  di  Atari. 

Ciao  e  a  presto. 

Damiano  Masi 
Lamporecchio  (PT) 

Ehi!!!  Andiamoci  piano  nel 
dire  che  le  macchine  Atari 
hanno  avuto  poca  fortuna  in 
Italia.  Non  abbiamo  sotto¬ 
mano  i  dati  precisi  di  vendita 
degli  ultimi  mesi,  ma  ti  pos¬ 
siamo  garantire  che  le  cose 
stanno  andando  a  gonfie  ve¬ 
le.  La  prova  è  data  dall'esi¬ 
stenza  di  questa  rivista  e  dal¬ 
l'impressionante  numero  di 
lettere  che  riceviamo  ogni 
giorno! 

Terremo  sicuramente  in  con¬ 
siderazione  la  tua  proposta 
di  comparare  lo  stesso  pro¬ 
dotto  per  diversi  computer. 
Ne  parleremo  in  Redazione  e 
decideremo  cosa  fare.  Al  mo- 
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mento  non  è  proponibile  in¬ 
vece  Videa  di  includere  una 
gara  per  home  computer:  lo 
spazio  è  sempre  tiranno  e  gli 
argomenti  certo  non  manca¬ 
no.  In  ogni  caso  anche  per 
questo  aspettiamo  di  vedere 
cosa  ne  pensano  gli  altri  let¬ 
tori. 

Le  novità  software  invece  so¬ 
no  arrivate ,  e  te  ne  sarai  reso 
conto  vedendo  Vinserzione 
della  Mastertronic  sullo  scor¬ 
so  numero  che  riportava  al¬ 
cune  delle  ultime  novità.  Al¬ 
tre  ce  ne  saranno  anche  in  fu¬ 
turo. 

Dopo  aver  compilato  il 
questionario,  scrivo 
due  righe  per  dire  che 
il  520  ST  l’ho  appena  com¬ 
prato  e  i  programmi  li  ho  ap¬ 
pena  fatti  arrivare  dalla  Fran¬ 
cia  perché  sulle  riviste  italia¬ 
ne  non  ho  trovato  inserzioni 
di  rivenditori  con  l’elenco  dei 
programmi  che  forniscono  (e 
non  ultima  cosa  in  Francia  si 
compra  Hors  Taxe:  in  Italia 
PIVA  si  paga!). 

A  parte  questo  vorrei  sapere 
come  posso  fare  per  abbonar¬ 
mi  alla  Vostra  Rivista,  l’unica 
in  italiano  che  parli  deH’Atari 
(tenete  presente  che  lavoro 
undici  mesi  su  dodici)  e  dove 
posso  rivolgermi  per  i  pro¬ 
grammi.  In  Francia  sono  co¬ 
modi,  ma  poi  c’è  la  noia  di 
tradurre  tutto  in  italiano. 
Chiedo  scusa  se  vi  ho  distur¬ 
bato.  Distinti  saluti. 

P.S.:  Mi  interessano  in  parti¬ 
colare  programmi  di  contabi¬ 
lità. 

Luciano  Furlan 
Constantine  (Algeria) 

I  lettori  non  ci  disturbano 
mai ,  anzi.  E  poi  ci  fa  piacere 
sapere  che  abbiamo  amici 
addirittura  in  Algeria. 

Per  abbonarsi  deve  effettuare 
un  pagamento  tramite  asse¬ 
gno  bancario ,  o  vaglia ,  o 
versamento  sul  c/c  postale  n. 
11666203  intestato  a  Gruppo 
Editoriale  Jackson  SpA ,  Via 
Rosellini  12  -  20124  Milano , 
specificando  la  richiesta  di 
abbonamento  alla  “Rivista  di 
A  tari”.  L'importo  è  di  24.000 
lire  (se  desidera  ricevere  la 
Rivista  in  Italia )  oppure  di 
48.000  lire  ( abbonamento  an¬ 
nuo  per  Vestero). 

Per  i  programmi  le  consiglia¬ 
mo  di  rivolgersi  alla  Hard  & 
Soft  (Servizio  Clienti  -  Via 


Sem  Benelli  8  -  20151  Mila¬ 
no)  che  ha  un  vastissimo  ca¬ 
talogo  di  software  per  A  tari  e 
che  effettua  anche  vendita  per 
corrispondenza,  o  alla  Ma¬ 
stertronic  (servizio  Vendita 
per  Corrispondenza)  di  Ca- 
sciago  (Varese). 

Sperando  di  esserle  stati  di 
aiuto  la  salutiamo  e  la  ringra¬ 
ziamo  per  V attenzione. 

Spettabile  Redazione  de 
“La  Rivista  di  Atari”, 
ho  letto  il  primo  nume¬ 
ro  del  giornale  e  mi  è  piaciuto 
moltissimo,  soprattutto  per  la 
varietà  delle  rubriche,  dalle 
News  alle  prove  hardware, 
dai  listati  alle  prove  software. 
Vi  ho  scritto  questa  lettera 
per  farvi  alcune  domande  a 
cui  spero  mi  possiate  dare 
una  risposta  (possiedo  un  800 
XL  con  registratore): 

1  -  In  una  delle  prove  softwa¬ 
re  per  ST  c’è  scritto  che  i  gio¬ 
chi  Silent  Service  e  Leader 
Board  sono  stati  prodotti  an¬ 
che  per  la  serie  XL/XE:  esi¬ 
stono  in  Italia  le  versioni  su 
cartuccia  e  su  cassetta  per 
l’XL?  Se  sì,  dove  le  posso 
trovare  a  Milano? 

2  -  Al  Tempio  del  Computer 
di  Milano  e  nei  punti  vendita 
Atari  posso  trovare  alcuni 
giochi  su  cassetta  o  cartuccia 
per  l’Atari  XL? 

3  -  Dove  sono  a  Milano  i  ne¬ 
gozi  Bit  Shop  Primavera? 
Attendo  cortesemente  una 
vostra  risposta  non  prima  di 
avervi  rinnovato  i  miei  com¬ 
plimenti  per  la  fantastica  rivi¬ 
sta. 

Cordiali  saluti. 

Andrea  Bottos 
Milano 

Eccoti  tre  risposte  lampo  per 
i  tuoi  quesiti. 

I  giochi  Silent  Service  e  Lea¬ 
der  Board  sono  disponibili 
per  i  computer  della  serie  XL 
solamente  su  disco.  Per  aver¬ 
li  prova  a  rivolgerti  ai  riven¬ 
ditori  Atari  di  Milano  che 
compaiono  in  fondo  alla  ri¬ 
vista. 

Risposta  positiva  per  il  repe¬ 
rimento  dei  programmi  su 
cassetta  e  cartuccia  nei  nego¬ 
zi  di  Milano:  non  dovresti 
avere  alcun  problema. 

La  Bit  Shop  Computers  (ex 
Bit  Shop  Primavera)  è  pre¬ 
sente  a  Milano  in  Via  Carlo 
Farini,  82  -  Tel.  6880429  - 
6882171. 


Una  schermata  di  "The  Print  Shop" 


pettabile  Redazione, 
ho  aspettato  con  ansia 
l’uscita  del  secondo  nu¬ 
mero  della  vostra  egregia  ri¬ 
vista,  notando  subito  la  rispo¬ 
sta  alla  lettera  che  avevo  pre¬ 
cedentemente  spedito,  il  che 
mi  ha  fatto  molto  piacere  e 
ridere.  La  domanda,  o  me¬ 
glio  le  domande,  che  vi  pon¬ 
go  questa  volta  riguardano 
l’ormai  attesissimo  Blitter.  A 
tale  proposito  vorrei  sapere: 

-  come  funziona 

-  come  si  installa  (e  da  chi) 

-  quando  lo  metteranno  in 
commercio. 

Giungendo  al  termine  di  que¬ 
sta  lettera  (detto  fra  noi,  per¬ 
ché  qualche  volta  non  mette¬ 
te  in  copertina  una  bella  ra¬ 
gazza?!)  e  sperando  nel  buon 
esito  della  vostra  rivista,  fini¬ 
sco  porgendovi  i  miei  migliori 
auguri. 

Riccardo  Loffi 
Cremona 

Caro  Riccardo,  non  ti  sarai 
mica  messo  in  testa  di  diven¬ 
tare  ricco  scrivendo  alla  “Ri¬ 
vista  di  Atari”?  A  partire  da 
questo  numero  non  paghia¬ 
mo  più  le  lettere! 

Torniamo  a  un  po'  di  serietà. 
L'atteso  Blitter  si  fa  ancora 
attendere.  L' Atari  Italia ,  in¬ 
terpellata  in  proposito,  ha 
detto  che  non  è  possibile  pre¬ 
ventivare  il  tempo  di  attesa 
che  ancora  occorrerà  prima 
di  poter  commercializzare 


nel  nostro  paese  questo  chip 
grafico. 

Di  conseguenza  non  sappia¬ 
mo  dirti  nemmeno  se  l'instal¬ 
lazione  verrà  fatta  presso  i 
centri  di  assistenza  Atari  o  da 
qualche  altra  parte.  Non  ap¬ 
pena  avremo  notizie  le  pub¬ 
blicheremo. 

pettabile  Redazione, 
vi  scrivo  innanzitutto 
per  complimentarmi 
per  la  bella  Rivista.  La  trovo 
eccezionale,  buona  sotto  tutti 
i  punti  di  vista,  e  soprattutto 
rende  giustizia  a  noi  Ataria- 
ni,  o  Ataristi  (a  proposito  co¬ 
me  si  dice?),  che  vedevamo 
relegato  il  nostro  home  (leggi 
400-800-XL-XE)  al  ruolo  di 
Cenerentola  degli  “8  bit”,  ve¬ 
dendo  in  edicola  tante  riviste 
e  prodotti  per  i  computer  più 
in  voga  (Commodore,  Sin¬ 
clair,  Sharp,  sic!).  Vedevamo 
sui  volti  dei  nostri  amici-anta¬ 
gonisti  sorrisetti  maliziosi  e 
commiserevoli,  come  chi  cer¬ 
ca  di  consolare  un  amico  che 
ha  avuto  la  sfortuna  di  fare 
un  acquisto  a  dir  poco  sba¬ 
gliato  e  che  segretamente 
avrebbero  desiderato  conver¬ 
tirci  alla  loro  fede.  Fortuna 
che  Atariani  si  nasce  e  non  lo 
si  diventa  (anche  se  debbo  ri¬ 
tenere  di  essere  in  errore  per¬ 
ché  da  quando  l’Atari  è  pas¬ 
sato  al  sig.  Tramiel  i  nostri 
computer  ce  li  invidiano  un 
po’  tutti)  per  cui  i  bocconi 
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amari  che  i  nostri  antagonisti 
ci  obbligavano  a  mandar  giù 
non  hanno  scalfito  minima¬ 
mente  la  nostra  fede  nel  mar¬ 
chio  Atari.  Ed  oggi,  con  l’av- 
vento  della  serie  ST,  dei  vari 
520,  1040,  Mega  1,  2  e  4,  dei 
PC  IBM  compatibili,  della 
stampante  laser,  dell’hard 
disk  da  20  Mega,  ecc.,  l’ Atari 
è  entrata  di  prepotenza  e  con 
giusto  diritto  (leggi  prezzo- 
+qualità)  a  far  parte  dell’éli¬ 
te  mondiale  delle  case  di  har¬ 
dware  a  16/32  bit. 

Non  mi  dilungo  oltre  per  non 
occupare  spazio  prezioso  in 
questa  importante  “Rivista  di 
Atari”,  ma  prima  di  conge¬ 
darmi  (momentaneamente 
spero)  da  Voi,  ho  da  formu¬ 
lare  una  richiesta  che  spero 
possiate  esaudire:  ho  da  qual¬ 
che  mese  acquistato  una 
stampante  Atari  1029,  e  tran¬ 
ne  qualche  breve  listato  di 
programma  Basic  non  sono 
riuscito  ad  ottenere  nulla.  Ho 
visto  da  un  amico  Atariano 
che  esiste  un  programma,  e 
precisamente  il  “Print-Shop” 
della  Broderbund,  che  fa  co¬ 
se  strabilianti,  ma  solo  sulla 
sua  stampante  (possiede  una 
Mannesmann).  Sulla  mia 
Atari  1029  non  succede  pro¬ 
prio  nulla.  Ora  mi  domando: 
possibile  che  l’Atari  non  ab¬ 
bia  pensato  ad  un  rifacimento 
di  tale  programma  che  si 
adatti  alle  sue  stampanti?  Se 
siete  in  grado  di  venirmi  in¬ 
contro,  o  se  potete  lanciare 
un  appello  attraverso  la  Vo¬ 
stra  Rivista,  ve  ne  sarei  enor¬ 
memente  grato.  Sarei  anche 
contento  se  mi  poteste  indi¬ 
care  un  programma  alternati¬ 
vo  a  quello  indicato,  ma  che 
funzioni  bene  sulla  mia  stam¬ 
pante. 

Nel  caso  vi  fosse  in  commer¬ 
cio  quanto  Richiestovi,  Vi 
sarei  grato  se  mi  indicaste  il 
modo  di  reperirlo. 

Al  grido  di  “Forza  Atari!!!” 
Vi  saluto  e  resto  in  ansiosa 


attesa  di  una  risposta  circa  il 
mio  quesito.  Guido  Uliano 
Via  Nolana,  15 
80045  -  Pompei  (NA) 

Finalmente  abbiamo  l’occa- 
sione  per  dire  una  volta  per 
tutte  qual  è  il  nostro  vero  e 
unico  nome!  Noi  siamo  Ata- 
riani,  nome  derivante  dallin- 
glese  Atarians,  non  Ataristi. 
Va  bene? 

La  risposta  alle  tue  domande 
è  purtroppo  negativa  su  tutti  i 
fronti :  la  tua  stampante  non  è 
assolutamente  compatibile 
con  uThe  Print  Shop ”  e  altri 
programmi  del  genere. 

Per  lo  meno  non  siamo  a  co¬ 
noscenza  di  software  di  que¬ 
sto  tipo  utilizzabile  con  l’A- 
tari  1029. 

La  sola  cosa  che  puoi  fare  è 
procurarti  una  stampante 
Epson  o  compatibile  con  re¬ 
lativa  interfaccia.  In  ogni 
modo ,  se  qualche  lettore  po¬ 
trà  esserti  d’aiuto  speriamo 
che  si  metta  in  contatto  con 
te. 


pettabile  Redazione, 
sono  molto  contento 
che  finalmente  sia  usci¬ 
ta  una  rivista  del  tutto  dedi¬ 
cata  all’ Atari. 

Io  sono  in  possesso  di  un  800 
XL  e  da  molto  tempo  (circa 
due  anni)  sono  alla  ricerca 
del  ComputerEyes  (interfac¬ 
cia  digitale  per  le  immagini 
da  telecamera)  e  del  Voice 
Master  (sintetizzatore  voca¬ 
le)  e  sono  riuscito  a  trovare 
soltanto  il  S.A.M.  (program¬ 
ma  che  permette  di  far  parla¬ 
re  il  mio  amato  800  XL). 
Vorrei  quindi  sapere  se  è 
possibile  trovare  l’interfaccia 
digitale  ed  il  sintetizzatore 
vocale  e  se  vi  è  possibile  dir¬ 
mi  il  prezzo  e  come  averli 
(magari  anche  richiedendoli 
all’estero). 

Inoltre,  per  aiutare  gli  amici 
di  Atari,  vi  mando  alcune  Po- 
ke  da  me  utilizzate: 

POKE  731,255  -  disattiva  il 
“Click”  della  tastiera 
POKE  731,0  -  riattiva  il 
“Click”  della  tastiera 
POKE  842,13  -  auto-RE- 
TURN 

POKE  824,12  -  disattiva  l’au- 
to-RETURN 

POKE  622,255  -  scrolling  fi¬ 
ne,  modo  grafico  0  (rallenta 
lo  scrolling  del  video) 

POKE  580,1  -  attiva  il  tasto 
RESET 

Per  chi  vuole  disattivare  il  ta¬ 
sto  BREAK  ecco  una  sempli¬ 
ce  routine  (ricordate  che  si 
disattiva  automaticamente  al 


cambio  di  grafica): 

10  IF  PEEK  (16)  >  =  128 
THEN  PE  =  PEEK(16)  - 
128 

20  POKE  16,PE:POKE 
53774, PE 

Lieto  dell’uscita  della  nuova 
rivista,  chiudo  salutandovi  e 
dicendo  che  chiunque  voglia 
entrare  in  contatto  con  me 
può  farlo  scrivendo  a  Rober¬ 
to  Rossi,  Via  Fraz.  Ville  104, 
Terranuova  B.ni  (AR)  o  tele¬ 
fonando  allo  055/93254  (an¬ 
che  se  sarà  difficile  trovarmi 
in  casa). 

Purtroppo  le  notizie  riguar¬ 
do  il  digitalizzatore  non  so¬ 
no  buone :  ComputerEyes  è 
reperibile  solamente  negli 
Stati  Uniti ,  dove  viene  pro¬ 
dotto  dalla  Digital  Vision  (14 
Oak  St.  -  Suite  2  Needham. 
MA  02192  USA)  alla  quale 
potrai  rivolgerti  per  averlo.  Il 
prezzo ,  orientativo ,  dovreb¬ 
be  aggirarsi  tra  le  trecento  e 
le  quattrocentomila  lire. 

Per  quanto  riguarda  il  Voice 
Master  ti  consigliamo  di  ri¬ 
volgerti  all’ A  tari  Club  Mila¬ 
no ,  Via  Spalto  Maddalena 
20/C  c/o  Centro  Libra  -  21052 
Monza  (MI);  Tel.  02/5457256 
(Emanuele),  02/8395964  (Da¬ 
niele)  e  039/835052  (Doria¬ 
no). 

Circola  voce  che  da  quelle 
parti  ne  esista  uno,  e  quindi 
forse  loro  potranno  darti 
qualche  utile  indicazione. 


I 

la  rivista  di  ATAR! 


ABBONARSI  E  FACILE 

ABBONAMENTO  ANNUO  6  NUMERI  L.  24.000 

PER  L'ESTERO  L.  48.000 


□  L’abbonamento  dovrà  decorrere  dal  mese  di . 

Nome  e  Cognome - 

Via  e  n.  _ _ 

Cap _ Località _ 

Per  il  pagamento  □  Allego  assegno  n - 

Banca  - - 


-Tel.  (  ). 


.  Prov. . 


_di  L. . 


□  Ho  effettuato  versamento  di  L. _ _ sul  c/c  postale  n.  11666203 

intestato  a  Gruppo  Editoriale  Jackson  -  Milano  e  allego  fotocopia  della  ricevuta 

□  Ho  effettuato  versamento  di  L _ tramite  vaglia  postale 

o  telegrafico  e  allego  fotocopia  ricevuta. 

□  Vi  autorizzo  ad  addebitare  l'importo  di  I - 


.sulla  carta  di  credito 


□  VISA 


Daty_ 


□  AMERICAN  EXPRESS 

_ Data  di  scadenza . 

_ Firma _ 


□  DINERSCLUB 
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ERRATA  CORRIGE 


Lettura  e  dump  di  un  settore  logico 

Prima  versione:  5/2/1987 

Revisionato  il:  14/2/1987 

Versione  1.0  :  15/4/1987 

Autore:  Roberto  "Headache"  Cassare 

Note  :  questo  programma  e'  stato 
estratto  da  un  programma  piu'  esteso, 
completo  di  menu'  a  discesa  e  varie 
funzioni  di  lettura. 


A  causa  di  alcuni  refusi  tipografici,  il  listato  del  programma 
per  la  lettura  e  il  dump  di  un  settore  logico,  di  Roberto 
Cazzaro,  pubblicato  a  pagina  57  sullo  scorso  numero  è 
risultato  errato.  Per  darvi  modo  di  effettuare  le  correzioni 
lo  ripubblichiamo  corretto  e  modificato  in  modo  che  il 


programma  possa  girare  anche  con  il  GS  A  Basic  versione  1 . 


Funzione  per  la  lettura  di  un  settore 
logico  (da  0  a  720) 

Non  viene  fatto  nessun  controllo  se  il 
parametro  passato  e'  compreso  nei 
limiti  quindi  si  ponga  attenzione  a 
non  inserire  Logicai  maggiore  di  730! 

Deffn  Read. sect( Logicai ) =Xbios ( 8 , Buf_ high 
,Buf_ low, 0,0, Devno, Logicai  Mod  9+1, Logic 
al  Div  9,Sideno,l) 

Dimensionamento  Buffer  e 
inizializzazione  variabili 

Dim  A%( 256 ) 

Buf fer=Varptr ( A%(0) ) 

Buf_ high=Buf fer  Div  65536 

Buf_ low=Buf fer  Mod  65536 

Devno=0 

Sideno=0 

Er. f lag=False 

Ex_  f lag^False 

Logical=0 

True=- 1 
False=0 

MAIN 

Cls 

Repeat 

Ret=Fn  Read. sect ( Logicai ) 

If  Ret=0  Then 
Begin : 

Ex. f lag^False 
Gosub  Dump( Logicai ) 

Ex. f lag  indica  la  condizione  di 
uscita  anomala  dalla  procedura  DUMP 

If  Ex. f lag=False 
Gosub  Walt 
Endif 

qui  inizia  il  controllo  del  tasto 
premuto  (manca  l'istruzione  CASE  !) 

If  R=200  Or  R=208  Then 
Goto  Begin 
Endif 

If  R=203  Then 

If  Logical>0  Then 
Dee  Logicai 
Endif 

Goto  Again 
Endif 

If  R=205  Then 

If  Logical<719  Then 
Ine  Logicai 
Endif 

Goto  Again 
Endif 

If  R= 199  Then 
Logical=0 
Goto  Again 
Endif 

If  R=27  Then 
Er. f lag=True 
Goto  Again 
Endif 

Qui  inizia  il  trattamento  del  numero 


(necessariamente  a  3  cifre  ! ) 

Print  At ( 2 , 2 ) ; R-48 ; "  " 

Temp=100*(R-48) 

Gosub  Wait 
If  R< 48  Or  R> 57  Then 
Goto  Begin 
Endif 

Print  At ( 3 , 2 ) ;R-48 
Temp=Temp+10*( R-48 ) 

Gosub  Wait 
If  R< 48  Or  R> 57  Then 
Goto  Begin 
Endif 

Print  At ( 4 , 2 ) ;R-48 
Temp=Temp+ ( R- 48 ) 

If  Temp>719  Then 
Goto  Begin 
Endif 

Logical=Temp 

Else 

Er. f lag=True 

Mesg$= "Errore  numero  "+Str$(Ret) 
+".!  [Ritorno  all'editor" 

Alert  3 , Mesg$ , 1 , "  EDITOR  " , Dummy 
Endif 
Again : 

Until  Er. flag=True 
Edit 


Procedure  Dump( Logic. sect ) 

Gosub  Intest 

Counter=2 

I=Buffer 

Qui  bisognerebbe  usare  un  ciclo 
For-Next  ma  il  GFA  Basic  non 
permette  di  saltare  dentro  e  fuori 
i  cicli ,  cosi ' . . . 

Cicle : 

Print  Using  "####", I-Buffer ; 

Print  "  -  " ; 

Stampa  i  codici  esadecimali 

For  J=0  To  15 
Code=Peek ( J+I ) 

A$=Right$ ( "0" +Hex$ ( Code ) ,2) 

Print  A$ ; "  " ; 

Next  J 
Print  "  -  " ; 

Stampa  i  caratteri  ASCII  standard 
compresi  fra  32  e  127 
oppure  un  punto 

For  J=0  To  15 
Code=Peek ( J+I ) 

If  Code<32  Or  Code>127  Then 
Print  " . " ; 

Else 

Print  Chr$(Code) ; 

Endif 
Next  J 

Controlla  che  non  ci  sia  scrolling 
dei  dati 

Ine  Counter 


If  Counter<24  Then 
Print 
Else 

I=Buf fer+144 
Counter=2 
Gosub  Wait 

aspetta  la  pressione  di  un  tasto 
e  ritorna  il  controllo  a  main 
se  il  tasto  premuto  e'  diverso  da 
freccia  in  basso 

If  R< > 208  Then 
Ex. f lag=True 
Goto  Ex. loop 
Endif 

Gosub  Intest 
Endif 

If  I -Buffer < 496  Then 
Add  1,16 
Goto  Cicle 
Endif 
Ex. loop  : 

Return 

La  seguente  procedura  aspetta  la 
pressione  di  un  tasto  e  ne  ritorna  il 
valore  nella  variabile  R;  e'  piu' 
comoda  dell 'INPUT  e  permette  di 
riconoscere  anche  i  tasti  speciali 
(frecce,  tasti  funzione  ecc . ) . 

Accetta  solo  i  seguenti  caratteri  : 

(fra  parentesi  viene  dato  il  codice) 


freccia  in  alto  (200) 
freccia  in  basso  (208) 
freccia  a  destra  (205) 
freccia  a  sinistra  (203) 
CLR  HOME  (199.) 
Esc  (27) 


oppure  un  numero  (codici  da  48  a  57) 


Procedure  Wait 
Repeat 

R=Gemdos ( 7 ) 

Rh=( R  Div  65536)  Mod  256 
R=R  Mod  256 

If  Rh>  =7 1  And  Rh<  =  90  Then 
R=Rh+128 
Endif 

Until  R=27  Or  R=200  Or  R=208  Or  R=203 
Or  R=205  Or  R=199  Or  (R>=48  And  R<=57) 
Return 

Disegno  intestazione 

Procedure  Intest 
Cls 

Print  "sect  !  dati  esa.de 

cimali  !  caratteri" 

Print  Using  "####" , Logic. sect ; 

Print  "  !  " ; 

For  K=0  To  15 

Print  Right$( "0"+Hex$(K) ,2) ; "  "; 

Next  K 
Print  "  ! " 

Print  “ - 


Return 


^  Expert  e  Caf /Paint 
le  maggiori  novità 
dalla  Hard  &  Soft 

Grosse  novità  per  il  mondo 
Atari  dalla  Hard  &  Soft  di 
Terni.  La  ditta  umbra  ha  re¬ 
centemente  immesso  sul  mer¬ 
cato  nuovi  prodotti  hardware 
e  software  per  la  serie  ST  svi¬ 
luppati  esclusivamente  “in 
casa”. 

Le  due  proposte  software  so¬ 
no  costituite  da  un  program¬ 
ma  CAD,  abbinabile  anche 
ad  una  tavoletta  grafica,  e  da 
un  programma  di  sviluppo 
pronostici  adattabile  al  Toto¬ 
calcio,  al  Totip  e  all’Ena¬ 
lotto. 

Il  programma  grafico  si  chia¬ 
ma  CAT/Paint  e  costituisce 
un  sensibile  miglioramento 
anche  rispetto  al  già  eccellen¬ 


te  Degas  Elite  grazie  ai  molti 
effetti  speciali  ottenibili. 
CAT/Paint  viene  fornito  dal¬ 
la  Hard  &  Soft  unitamente  ad 
una  vasta  libreria  di  simboli 
utilizzabili  nei  disegni. 
L’unico  neo  di  questo  pro¬ 
gramma  è  rappresentato  dal 
fatto  che  per  il  momento 
CAT/Paint  è  disponibile 
esclusivamente  in  versione  ad 
alta  risoluzione  e  quindi  mo¬ 
nocromatica.  Il  problema,  ci 
hanno  però  garantito,  verrà 
sicuramente  risolto  nella 
prossima  versione  che  sarà 
perciò  a  colori.  CAT/Paint  è 
venduto  a  richiesta  abbinato 
ad  una  tavoletta  grafica,  sem¬ 
pre  firmata  Hard  &  Soft,  che 
può  essere  poi  sfruttata  an¬ 
che  per  altri  programmi.  I 
prezzi  di  questi  due  prodotti 
saranno  allineati  alla  strate- 
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già  di  vendita  dei  computer 
Atari  e  dovrebbero  quindi 
avere  un  prezzo  base  piutto¬ 
sto  contenuto. 

Il  programma  per  lo  sviluppo 
dei  pronostici  si  annuncia 
molto  sofisticato  e  adatto  an¬ 
che  alle  ricevitorie.  Di  questo 
programma  oltre  a  ciò  non  si 
sa  ancora  molto,  ma  avremo 
occasione  in  futuro  di  parlar¬ 
ne  ancora. 

Sempre  da  Hard  &  Soft  sono 
in  arrivo  due  digitalizzatori: 
RealTizer  ed  Expert. 

Il  primo  è  in  grado  di  visua¬ 
lizzare  immagini  immobili  in 
tempo  reale  con  una  risolu¬ 
zione  di  320  punti  per  200,  il 
secondo  invece  impiega  alcu¬ 
ni  secondi,  ma  la  risoluzione 
è  settabile  dall’utente  da  un 


minimo  di  256x256  pixel  fino 
ad  un  massimo  di  1024x512! 
Inoltre  Expert  consente  di 
operare  con  ben  128  tonalità 
diverse  di  grigio.  Una  risolu¬ 
zione  così  alta  è  l’ideale  per 
lavori  sofisticati  e  serve  ad  ot¬ 
timizzare  l’immagine  video. 
Altra  particolarità  è  la  possi¬ 
bilità  di  controllare  diretta- 
mente  da  programma  la  lumi¬ 
nosità  e  il  contrasto  di  ogni 
singola  immagine. 

Se  a  tutto  ciò  aggiungiamo 
che  le  immagini  ottenute  con 
i  due  apparecchi  sono  total¬ 
mente  compatibili  con  TUT¬ 
TI  i  programmi  grafici,  com¬ 
preso  l’ultimo  arrivato 
CAT/Paint,  si  può  facilmente 
capire  quale  sia  il  livello  di 
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questi  digitalizzatori. 

Per  ulteriori  informazioni: 
Hard  &  Soft  -  Via  Bolzello,  2 
-  05100  Terni  -  Tel. 

0744/46658. 

^  Sette  giothi  per 
tutti  i  gusti 

La  Mastertronic  continua  ad 
immettere  sul  mercato  novità 
software  per  le  macchine 
Atari,  sia  per  8  bit,  sia  per 
ST.  Il  settore  dei  videogiochi 
sembra  essere  uno  dei  più  at¬ 
tivi  negli  ultimi  tempi,  e  la 
casa  varesina  ha  aggiornato  il 
suo  catalogo  con  sette  nuovi 
programmi  di  questo  tipo,  ri¬ 
manendo  fedele  alla  politica 
dei  prezzi  contenuti. 

Per  i  computer  della  serie  800 
e  130  sono  ora  disponibili 
Countlet,  Arkanoid,  Mutant 
Camels  e  Power  Bower, 
questi  ultimi  due  posti  in  ven¬ 
dita  con  Nice  Price,  ovvero  a 
5000  lire  cad. 

Tre  nuovi  arrivi  per  le  mac¬ 
chine  ST  completano  il  qua¬ 
dro  delle  novità  in  casa  Ma¬ 
stertronic:  Mean  18,  Micro 
Cross  e  Arkanoid. 

Il  primo  è  una  nuova  versio¬ 


ne  del  golf  che  certamente 
non  mancherà  di  interessare 
gli  appassionati  del  genere, 
Micro  Cross  è  un  divertente 
gioco  d’azione  che  si  svolge 
su  di  una  scacchiera  e  che 
consiste  in  una  gara  su  pattini 
a  rotelle  resa  difficile  da  ogni 
sorta  di  ostacolo  posto  sul 
percorso  e  Arkanoid  è  un  ri¬ 
facimento  realizzato  vera¬ 
mente  molto  bene  del  noto 
gioco  che  consisteva  nel  di¬ 
struggere  un  muro  di  matto¬ 
nelle  con  una  pallina  e  una 
racchetta. 

Descritto  a  parole  può  sem¬ 
brare  banale,  ma  in  realtà  il 
game  si  rivela  divertente  e 
coinvolgente. 

Per  ulteriori  informazioni: 
Mastertronic  -  Via  Mazzini, 
15  -  21020  Casciago  (Varese) 
-  Tel.  0332/212255. 

^  lago  per  /'office 
automation 

Alcune  primizie  interessanti 
ci  vengono  proposte  dalla  La¬ 
go,  che  è  sempre  una  delle 
più  attive  importatrici  di  so¬ 
ftware  per  Atari.  Atteso  da 
tempo,  arriva  il  tedesco  GSA 


Draft,  che  però  nel  nostro 
paese  verrà  commercializzato 
nella  versione  inglese  curata 
dalla  GlenTop. 

Questo  programma  grafico  si 
presenta  molto  bene  con  una 
serie  di  feature  che  lo  rendo¬ 
no  appetibile  ad  una  vasta 
schiera  di  potenziali  utenti  e 
dovrebbe  essere  immesso  sul 
mercato  ad  un  prezzo  conte¬ 
nuto  al  di  sotto  delle  duecen¬ 
tomila  lire. 

Sempre  nella  stessa  categoria 
di  prezzo  si  collocherà  Trim 
Base,  un  database  relaziona¬ 
le  di  cui  però  al  momento 
non  sappiamo  molto. 
Vedremo... 

Una  serie  di  programmi  de¬ 
stinati  all’office  automation 
sono  la  carta  che  Lago  gioca 


nel  settore  del  software  inte¬ 
grabile:  Word  Writer,  Data 
Manager  e  Swift  Cale  sono 
tre  programmi  completamen¬ 
te  compatibili  tra  loro  che  do¬ 
vrebbero  risolvere  qualsiasi 
problema  di  trasferimento 
dati  ad  un  costo  molto  conte¬ 
nuto. 

Il  word  processor,  il  database 
e  lo  spreadsheet  prodotti  dal¬ 
la  Timeworks  dovrebbero  co¬ 
stare  ciascuno  99.000  lire. 
Ancora  dalla  Lago  tre  giochi: 
l’ormai  famoso  Barbarians, 
con  una  grafica  splendida, 
l’altrettanto  celebre  Star 
Trek  e  Turbo  GT,  simulatore 
di  corsa. 

Per  ulteriori  informazioni: 
Lago  -  Viale  Masia,  79  -  Co¬ 
mo  -  Tel.  031/300174. 


TRASFORMA  IL  TUO  ATARI  ST 

IN  UN  SUPER  PERSONAL  O  IN  UN  PC  MS-DOS®  3.20  COMPATIBILE 


Drive  3"  1/2,  720  Kb,  alimentatore  in¬ 
terno,  compatibile  con  520  o  1 040  ST. 

Drive  3"  1/2  Doppio,  1.4  Mb,  alimen¬ 
tatori  interni,  trasforma  il  520  in  un  Per¬ 
sonal. 


Drive  5"  1/4,  720  Kb,  alimentatore  in¬ 
terno,  trasforma  il  520  o  1040  in  un 
compatibile  MS-DOS®  Versione  3.20. 

Drive  5"  1/4  doppio,  1.4  Mb,  alimen¬ 
tatori  interni,  cavo  seriale,  trasforma 
gli  ST®  in  un  PC  MS-DOS®  a  doppio 
Floppy. 


Drive  combinato  3"  1/2  +  5"  1/4,  1.4 
Mb,  per  tutti  gli  usi  degli  ST®  come  PC 
MS-DOS®  o  come  TOS®  Atari.  Utilis¬ 
simo  per  tutte  le  operazioni  di  trasferi¬ 
mento  da  3"  1/2  a  5"  1/4  e  viceversa. 

accessori  per  computare 


SONO  DISPONIBILI  I  FILE  CARD  DA  20  MB 
E  DA  30  MB  HARD  DISK  DA  30  MB,  40  MB  E  60  MB 


il 


SEZIONE  8  BIT 


DI  EMANUELE  BERGAMINI 


COMPUTCREYES 


ESISTONO  PRODOTTI  CHE  SFRUTTANO  A 
FONDO  LE  CAPACITÀ  GRAFICHE  DEGLI  ATA- 
Rl  8  BIT;  PER  ESEMPIO  IL  DIGITALIZZATORE 


Abbiamo  già  visto  un  digitalizzato¬ 
re  per  ST,  ora  tocca  agli  8  bit. 
COMPUTEREYES  appare  come 
una  piccola  scatola  dalla  quale  spuntano 
due  spinotti  che  vanno  inseriti  nelle  por¬ 
te  1  e  2  dei  joystick,  due  manopole  per 
regolare  l’immagine  e  una  presa  a  cui  si 
collega  la  nostra  sorgente  video,  sia  essa 
una  telecamera  o  un  videoregistratore. 
Nelle  confezione  troviamo  un  manualet- 
to  sufficientemente  esplicativo  (in  ingle¬ 
se)  e  un  disco  contenente  il  programma 
di  controllo,  che  è  scritto  (in  parte)  in 
basic. 

Carichiamo  il  disco.  Dopo  alcuni  minuti 
comparirà  il  menu  principale,  con  varie 
opzioni.  Esaminiamole  una  ad  una:  - 
ADJUST  SYNC  -  serve  a  sincronizzare 
l’apparecchio  con  la  sorgente  video,  gi¬ 
rando  la  manopola  di  sinistra. 
BRIGHTNESS  -  serve  a  regolare  il  fuo¬ 
co  e  la  luminosità  del  segnale,  girando  la 
manopola  di  destra.  Queste  due  opera¬ 
zioni  devono  essere  fatte  all’inizio,  poi 
non  più.  Ora  possiamo  finalmente  cattu¬ 
rare  le  immagini. 

L’opzione  NORMAL  CAPTURE  è  la 
più  facile  da  usare.  In  soli  6  secondi  ap¬ 
parirà  sul  video  l’immagine.  Questa  op¬ 
zione  effettua  una  scansione  dell’imma- 


I! ■l'immagine  realizzata 
con  Compvtereyes  e 
linee— bramente 
itampata  con 
Ottimate  20 

gine  esaminando  la  luminosità  di  ogni 
punto  che  viene  confrontata  con  un  valo¬ 
re  campione:  ogni  punto  più  chiaro  appa¬ 
rirà  bianco,  mentre  quelli  più  scuri  saran¬ 
no  neri. 

4  LEVEL  CAPTURE  -  lavora  in  manie¬ 
ra  simile  alla  precedente,  ma  effettua  4 
scansioni  differenti  su  4  diverse  soglie  di 
grigio.  L’immagine  finale  sarà  composta 


dalla  somma  delle  4  scansioni.  Analoga¬ 
mente,  l’opzione  8  LEVEL  CAPTURE 
effettua  8  scansioni  diverse,  producendo 
non  più  immagini  con  forte  contrasto  ma 
con  bellissimi  effetti  di  sfumature. 
Naturalmente  ci  vuole  più  tempo  per  cat¬ 
turare  un’immagine,  cioè  rispettivamen¬ 
te  25  e  50  secondi. 

Queste  tre  opzioni  producono  immagini 
che  utilizzano  l’alta  risoluzione  della  gra¬ 
fica  8  monocromatica,  quindi  le  immagi¬ 
ni  sono  compatibili  con  tutti  i  programmi 
grafici  che  utilizzano  la  grafica  8.  Ma  le 
potenzialità  grafiche  dell’Atari  non  si 
fermano  qui,  ed  è  possibile  digitalizzare 
un’immagine  in  grafica  15  (meglio  cono¬ 
sciuta  come  grafica  7  1/2).  Le  opzioni 
CONTRAST  CAPTURE  producono,  in 
18  secondi,  immagini  che  usano  i  quattro 


colori  disponibili  come  sfumature  di  gri¬ 
gio  con  contrasti  più  o  meno  forti.  Le 
immagini  così  realizzate  sono  perfetta¬ 
mente  compatibili  con  i  maggiori  pac¬ 
chetti  grafici,  compreso  l’AtariArtist  con 
il  quale  possiamo  colorare  le  immagini  e, 
con  una  stampante  grafica,  persino  por¬ 
tarle  su  carta.  È  addirittura  possibile 
stamparle  a  colori. 


Le  altre  opzioni  del  menu  permettono  di 
stivare  o  recuperare  un’immagine  su  di¬ 
sco  (occupare  62  settori).  L’opzione 
VIEW  mostra  l’ultima  immagine  selezio¬ 
nata  (digitalizzata  o  caricata  da  disco), 
mentre  CATALOG  mostra  la  directory. 
Molto  utile  è  l’opzione  HELP  che  forni¬ 
sce  un  minimo  di  indicazioni  su  ogni  op¬ 
zione.  Per  attivarla  si  deve  premere  “?” 
seguito  dal  tasto  dell’opzione  di  cui  vo¬ 
gliamo  la  spiegazione,  premendo  sempli¬ 
cemente  return  torniamo  al  menu. 

Cosa  si  può  dire  per  concludere?  Questo 
apparecchio  contribuisce  a  rendere  vera¬ 
mente  completo  il  parco  accessori  del  no¬ 
stro  8  bit,  alla  faccia  di  quelli  che  credo¬ 
no  che  serva  solo  per  giocare  a  Pac-Man. 
Purtroppo  chi  vuole  aggiudicarsi  COM¬ 
PUTEREYES  si  trova  costretto  a  com¬ 


prarlo  direttamente  dalPAmerica,  spen¬ 
dendo  qualcosa  come  tre/quattrocento- 
mila  lire,  ma  pensate  al  divertimento  di 
poter  digitalizzare  la  propria  ragazza  o  il 
gatto  di  casa  che  dorme.  Chi  ama  la  gra¬ 
fica  non  può  proprio  farne  a  meno. 
Prodotto  da: 

DIGITAL  VISION,  14  Oak  St.  -  Suite  2 
Needham.Ma  02192  USA 
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SEZIONE  8  BIT 


TIPS  &  TRICKS 


DI  MAURO  PAVONE 


SULIA  TASTIERA 

Con  la  pressione  di  un  tasto  sapete  che 
il  vostro  Atari  produce  un  “click”.  Se  ciò 
vi  dà  fastidio,  con  un  POKE  731,255  lo 
eliminerete.  Per  riattivarlo  usate  POKE 
731,0. 

Quando  invece  tenete  abbassato  per  un 
certo  periodo  di  tempo  il  tasto,  il  caratte¬ 
re  in  questione  verrà  ripetuto  sullo  scher¬ 
mo  finché  non  lascerete  il  tasto.  Per  va¬ 
riare  il  periodo,  inserite  il  valore  deside¬ 
rato  nella  locazione  729,  che  inizialmente 
è  48  (sessantesimi  di  secondo).  Un  valore 
alto  indica  un  tempo  lungo,  uno  basso 
un  tempo  breve,  con  lo  0  si  disinserisce  la 
ripetizione  automatica. 

La  locazione  730,  controlla  il  numero  di 
caratteri  visualizzabili  in  un  secondo  du¬ 


rante  la  ripetizione  automatica.  Inizial¬ 
mente  contiene  un  6.  Con  uno  0,  anche 
in  questo  caso,  si  elimina  momentanea¬ 
mente  la  ripetizione. 

La  tavola  di  definizione  della  tastiera  è 
l’elenco  dei  caratteri  appartenenti  ad 
ogni  tasto.  È  possibile  ridefinirlà,  inter¬ 
venendo  sull’ordine  iniziale  inserendo  i 
192  dati  necessari  in  una  zona  libera  di 
memoria  e  sistemando  di  conseguenza  i 
puntatori  alle  locazioni  121  e  122  che 
normalmente  puntano  la  locazione 
64337. 

I  primi  64  dati  riguardano  i  tasti  premuti 
senza  SHIFT,  i  secondi  i  tasti  premuti 
con  SHIFT  ed  infine,  l’ultimo  gruppo, 
quelli  premuti  con  CONTROL,  secondo 
il  seguente  ordine: 


1 

j  ; 

FI 

F2 

k 

+ 

* 

o 

P 

u 

RETURN 

i 

- 

= 

V 

c 

F3 

F4 

b 

X 

z 

4 

3 

6 

ESC 

5 

2 

1 

9 

SPACE 

n 

m 

/ 

inverse 

r 

e 

y 

TAB 

t 

w 

q 

9 

0 

7 

BACKS 

8 

< 

> 

f 

h 

d 

CAPS 

g 

s 

a 

I  SET 

DI  CARATTERI  ATARI 

Se  possedete  un  Atari  XI  e  XE,  nella 
vostra  ROM,  a  partire  dalla  locazione 
52224,  per  una  lunghezza  di  1K,  è  riser¬ 
vato  nella  memoria  il  cosiddetto  “set  in¬ 
ternazionale”  di  caratteri,  che  dispone  di 
un  vasto  campionario  di  lettere  corri¬ 
spondenti  alle  esigenze  europee  (ad 
esempio  le  vocali  accentate,  come  nelle 
macchine  per  scrivere).  Per  attivarlo,  di¬ 
gitate  “POKE  756,204”,  per  tornare  al 
set  normale  (quello  con  i  caratteri  grafi¬ 
ci),  “POKE  756,224”. 

Quando  il  set  internazionale  è  in  uso, 
otterrete  i  “nuovi”  caratteri  premendo, 
con  il  CONTROL,  un  tasto  alfabetico. 


CONVERSIONE  DEI  BASIC 

I  basic  installati  nei  vostri  ATARI  posso¬ 
no  essere  diversi  gli  uni  dagli  altri;  nei 
vecchi  400  e  800  c’è  il  cosiddetto  Basic 
A,  che  è  la  prima  versione.  La  maggior 
parte  degli  Atari  800  e  600  XL,  invece,  è 
stata  dotata  del  nuovo  Basic  B  che  non  è 
riuscito  a  supplire  la  carenza  della  prima 
versione  che,  nonostante  fosse  un  ottimo 
prodotto,  presentava  un  fastidioso  “bug” 
denominato  familiarmente  “keyboard 


lockup”.  Anche  il  Basic  B  presenta  un 
“bug”  che  porta  a  malfunzionamenti 
quali  rincorrere  nell’errore  9  o  il 
blocco  del  sistema.  Tutto  questo  è  spari¬ 
to  nella  versione  C  che  è  stata  adottata, 
negli  XL,  a  partire  dal  Marzo  del  1985.  Il 
programma  che  segue  ha  lo  scopo  di  con¬ 
vertire  il  vostro  basic  da  B  in  C.  Per  sa¬ 
pere  che  Basic  avete,  controllate  la  loca¬ 
zione  43234  e  verificate  la  versione  che 
sarà  A,  B  o  C  a  seconda  del  valore  che 
può  essere  162,96  o  234. 


1 0  FOR  I =0  TO  43  =  RERD  R  =  POKE  1 6384+ I ,  R  =  HEXT  I  : R=USR < 1 6384 > 

20  DRTR  104,1 69 , 0 , 1 33 , 203 , 1 69 , 1 60 , 1 33 , 204 , 1 62 , 32 , 1 60 , 0 , 1 77 , 203 , 72 
30  DRTR  169,255, 141,1,211,104, 145,203, 163,253, 141,1,211, 136,208,237 
40  DRTR  230 , 204 , 202 , 48 , 6 , 208 , 230 , 1 60 , O , 208 , 226 , 36 
50  FOR  J=1  T0  13  =  RERD  R ,  B  =  POKE  R  .B  NEXT  J 
60  DRTR  540 1 7 , 255 , 4323 1 , 234 , 43232 , 240 , 43233 , 1 7 

70  DRTR  43234 , 234 ,4791 3 , 0 , 49 1 39 , 0 , 43 1 40 , 0 , 49141 , 0 , 43 1 42 , O ,43143 , O , 43 1 44 , 0 , 49 145,0 


SEZIONE  8  BIT 


A  SCUOLA  DI  BASIC 


CONCATENAMENTO 
DI  PROGRAMMI 


DI  EMANUELE  BERGAMINI 

COME  SCRIVERE 
PROGRAMMI 
CONCATENATI  CON  IL 
BASIC  ATARI 


Il  Basic  Atari  permette  di  concatena¬ 
re  i  programmi  usando  il  comando 
RUN  “dev”  (“dev”  indica  la  periferi¬ 
ca,  ovvero  “C:”  per  il  registratore,  “D: 
nomefile.ext”  per  il  driver),  a  condizione 
che  il  programma  da  caricare  sia  stato 
salvato  precedentemente  con  SA- 
VE“dev”.  Tuttavia  il  Basic  Atari  riserva 
sempre  molte  sorprese:  infatti  ci  sono  al¬ 
tri  metodi  validi  per  concatenare  dei  pro¬ 
grammi.  Per  poter  caricare  un  program¬ 
ma  dobbiamo  prima  conoscere  come  vie¬ 
ne  salvato.  Ci  sono  tre  modi  per  salvare 
un  programma: 

1)  usando  il  comando  SAVE“dev”.  In 
questo  modo  i  programmi  vengono  sal¬ 
vati  in  forma  tokenizzata  (cioè  codificati, 
dove  ad  ogni  istruzione  corrisponde  un 
codice).  Questo  è  il  modo  comunemente 
usato  per  salvare  i  programmi  su  disco.  Il 


sistema  dei  “token”  (in  inglese  “getto¬ 
ni”)  permette  di  risparmiare  molto  spa¬ 
zio  su  disco,  perché  i  codici  di  ogni  co¬ 
mando  o  istruzione  sono  composti  da 
non  più  di  un  paio  di  bytes.  L’istruzione 
APPEND,  per  esempio,  invece  di  occu¬ 
pare  6  bytes  ne  occupa  solo  2.  Il  salvatag¬ 
gio  su  cassette  risulta  esser  abbastanza 
lento,  poiché  passa  un  certo  tempo  tra  la 
trasmisione  di  un  blocco  di  dati  e  un  al¬ 
tro. 

2)  Usando  il  comando  CSA  VE.  Questo 
comando  salva  il  programma  solo  sul  re¬ 
gistratore  in  forma  tokenizzata,  e  si  diffe¬ 
renzia  da  SAVE“C:”  solo  per  il  fatto  che 
è  più  veloce  poiché  i  blocchi  di  dati  non 
sono  interposti  da  spazio.  Per  ricaricare 
un  programma  si  usa  CLOAD. 

3)  Usando  il  comando  LIST“dev”.  In 
questo  caso  la  periferica  di  uscita  può 


essere  anche  la  stampante  o  lo  schermo. 
Il  programma,  che  è  mantenuto  in  me¬ 
moria  in  forma  tokenizzata,  viene  con¬ 
vertito  in  formato  ATASCII  leggibile  e 
mandato  alla  periferica  di  output,  esatta¬ 
mente  come  apparirebbe  sul  video.  Que¬ 
sto  è  il  modo  più  lento  per  caricare  o 
salvare  un  programma. 

Sappiamo  già  che  concatenare  program¬ 
mi  salvati  con  SA  VE  non  crea  problemi: 
basta  usare  RUN“dev”  e  il  programma 
viene  caricato  ed  eseguito. 

Il  caricamento  è  però  distruttivo  perché 
il  programma  chiamante  viene  cancellato 
dalla  memoria  come  se  avessimo  dato  un 
NEW:  anche  le  variabili  vengono  quindi 
cancellate  e  non  possono  essere  utilizzate 
nel  programma  chiamato. 

Per  chi  ha  solo  il  registratore  può  essere 
noioso  usare  il  “lento”  SAVE  quando  si 
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potrebbe  usare  un  metodo  più  rapido  per 
salvare  i  propri  programmi. 

I  più  smaliziati  che  possiedono  un  drive 
possono  anche  usare  il  dischetto  come 
memoria  dove  mantenere  tutte  le  varia¬ 
bili  che  vogliamo  salvare:  il  primo  pro¬ 
gramma  apre  un  file  in  scrittura  dove 
scrive  le  variabili,  poi  fa  partire  il  secon¬ 
do  programma  con  RUN”D:...”  (che  è 
più  veloce  di  ENTER),  il  quale  aprirà  in 
lettura  il  file  da  dove  recupererà  le  varia¬ 
bili  che  gli  servono. 

Ma  come  si  fa  a  concatenare  un  program¬ 
ma  salvato  con  CSA  VE?  Non  si  può  uti¬ 
lizzare  CLOAD  aH’interno  di  un  pro¬ 
gramma,  perché  fa  terminare  qualsiasi 
esecuzione  alla  fine  del  caricamento  (co¬ 
sì  come  LO  AD  e  ENTER):  saremmo 
dunque  costretti  a  dare  un  RUN  manual¬ 
mente.  In  Atari  Basic  non  esiste  un’istru¬ 
zione  per  caricare  e  far  partire  un  pro¬ 
gramma  salvato  con  CSA  VE;  il  listato  1 
presentato  in  questa  pagina  è  una  routine 


riabili  verranno  mantenute  perché  il  se¬ 
condo  programma  si  è  fuso  con  il  primo  e 
non  si  è  sostituito  ad  esso. 

Ma  come  si  fa  a  continuare  l’esecuzione 
del  programma  dopo  aver  caricato  la  se¬ 
conda  parte  visto  che  ENTER  fa  termi¬ 
nare  l’esecuzione? 

I  casi  sono  come  al  solito  due:  o  il  pro¬ 
gramma  da  concatenare  termina  con  un 
comando  diretto  come  un  RUN  o  un 
GOTO  a  una  certa  linea,  oppure  deve 
utilizzare  una  particolarità  della  locazio¬ 
ne  842  che  normalmente  contiene  il  vaio- 


duce  l’effetto  che  sappiamo.  Questo  stes¬ 
so  principio  è  stato  usato  nella  realizza¬ 
zione  del  ControList,  che  utilizza  un  ca¬ 
nale  aperto  sull’editor  in  modo  5,  cioè 
lettura  (mod  4)  a  cui  viene  aggiunto  il 
valore  1  per  settare  il  bit  0. 

Il  listato  2  utilizza  questa  caratteristica 
per  fare  un  concatenamento  automatico 
con  ENTER.  Quest’ultimo  può  essere 
usato  nel  caso  in  cui  un  programma  prin¬ 
cipale  debba  richiamare  parecchie  su¬ 
broutine:  basta  salvare  una  alla  volta  tut¬ 
te  le  subroutine  con  gli  stessi  numeri  di 


in  linguaggio  macchina  che  provvede  alla 
mancanza  di  un  comando  “CRUN”. 

Il  comando  ENTER“dev”  carica  un  pro¬ 
gramma  salvato  con  LIST,  ma  a  differen¬ 
za  di  LOAD  e  CLOAD  non  è  distrutti¬ 
vo.  Questo  comando  agisce  infatti  pren¬ 
dendo  dalla  periferica  le  linee  di  comandi 
come  se  fossero  digitati  da  tastiera.  Il 
vecchio  programma  rimane  in  memoria, 
ma  se  alcune  linee  di  istruzioni  hanno  il 
numero  di  linea  uguale  a  quello  delle  li¬ 
nee  già  presenti  nella  memoria  stessa, 
queste  verranno  sostituite  da  quelle 
nuove. 

Se  il  file  caricato  contiene  dei  comandi 
senza  numero  di  linea  (creabili  con  un 
qualsiasi  editor  di  linea  o  un  WP,  o  ag¬ 
giunti  con  dei  PRINT#  nel  file  aperto  in 
modo  APPEND),  questi  verranno  ese¬ 
guiti  come  domandi  diretti.  Anche  le  va¬ 


re  12;  se  questo  valore  viene  portato  a 
13,  il  computer  entra  nel  “MODO  RE¬ 
TURN”  e  si  comporta  come  se  il  tasto 
RETURN  fosse  sempre  premuto:  ogni 
scritta  sullo  schermo  può  quindi  essere 
utilizzata  come  comando.  Questa  loca¬ 
zione  infatti  contiene  il  modo  di  utilizzo 
del  canale  IOCB  0,  cioè  quello  utilizzato 
dal  Basic  come  editor,  ed  è  normalmente 
posto  a  12  (modo  input/output).  Portan¬ 
dolo  a  13  si  porta  il  bit  0  a  1 ,  attivando  il 
modo  di  lettura  concorrente  usato  con  le 
porte  RS-232,  ma  usato  con  l’editor  pro¬ 


linea,  così  quando  una  viene  caricata  si 
sostituisce  all’altra  già  presente,  e  può 
utilizzare  le  stesse  variabili  senza  proble¬ 
mi.  In  ogni  caso  la  scelta  del  metodo  da 
utilizzare  dipende  soprattutto  dal  tipo  di 
programma  e  dalla  periferica  a  disposi¬ 
zione:  chi  utilizza  il  registratore  avrà  an¬ 
che  un  problema  in  più,  ossia  quello  del 
posizionamento  del  nastro.  La  particola¬ 
rità  della  locazione  842  può  inoltre  essere 
sfruttata  per  effettuare  altri  comandi  sen¬ 
za  farli  digitare  direttamente  da  chi  usa  il 
programma  stesso. 
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SEZIONE  8  BIT 


mrnmi 


uni 
uni 

I  umili 
l*iuumi 
]*iMiuimuitt 
imiiimu 
immmtmi 
. min 


LISTATI 


XPONG 


SPAZIO  BASIC 


DI  MAURO  PAVONE 


Per  i  programmatori  e  per  i  non  pro¬ 
grammatori,  ecco  una  routine  in 
linguaggio  macchina  che  può  aiu¬ 
tarvi  a  dare  un  tocco  di  classe  ai  vostri 
programmi.  I  primi  potranno  servirsene 
per  inserirla  nei  loro  capolavori  in  Basic; 
i  secondi  potranno  digitare  il  listato  e 
giocare  con  XPONG,  un  mini-ping  pong 
realizzato  con  l’ausilio  della  suddetta 
routine. 

Questa  serve  alla  gestione  degli  sposta¬ 
menti  orizzontali  e  soprattutto  verticali 
dei  quattro  Player  messi  a  disposizione 
dall’hardware  dell’Atari.  Sapendo  che  il 
movimento  orizzontale  si  realizza  sem¬ 
plicemente  mettendo  la  coordinata  del 
player  0-3  nelle  locazioni  53248  -  5325 1  e 
che  il  movimento  verticale  si  ottiene  con 
lo  spostamento  del  blocco  dati,  relativo 
alla  figura,  nell’area  dedicata,  si  può  in¬ 
tuire  il  problema  di  lentezza  del  secondo 
tipo  di  movimento  che  ho  citato. 

La  routine  ha  proprio  il  compito  di  porre 
rimedio,  con  la  massima  semplicità,  a 
questo  inconveniente,  con  l’ausilio  di  un 
linguaggio  veloce. 

Per  utilizzarla  nei  vostri  programmi,  ba¬ 
sta  settare  la  RAM  TOP  alla  locazione 


1  REM  * 

2  REM  *  XPONG  <C>  1987  ba  MaP  t 

3  REM  %  * 

4  REM 

5  GOSUC  9000 

10  REM . . . VRBL 

20  X 1  =  1 0  :  X2=  1 0  :  XP=  1 1  :  YP=  1  =  ZP=2  =  XK=0  =  YK=  1  :  ZK=3  P 1  =0  ••  P2=0 :  H I  =0 :  PT=  1 5 

50  REM . GAME 

60  S0=ST I CK <  0  > : S 1 =ST I CK < 1 > 

70  XI  =X  1 + <  S0=7  >  +  <  S0=5  > + <  X 1  <0  >  -  <  *30=  1 1  >  -  <  30=  1 0  >  -  <  X 1  >  20  > 

90  K=USR  <  1 536  a  6 ..  RR ..  PM ..  X 1 +76  a  1 20+X 1  *2  > 

1 00  X2-X2+ <  S 1 =7  > + <  S 1 =5  >  +  <  X2  <0  > - <  S 1  =  1 1 ) - < S 1 = 1 0  > - < X2>  20  > 

1 20  K=USR  <  1 536 ..  3 ..  RR  a  PM+768 a  X2+ 1 54  a  1 20+X242  > 

1 30  XP=XP+XK - YP=YP+YK : ZP=ZP+ZK 
140  IF  XP<1  OR  XP> 1 9  THEH  XK=-XK 

150  IF  YP> 20  OR  YP<1  THEH  YK=-YK : I F  YF-0  THEH  GOSUB  9500 

1 70  K=USR  <  1 536 ..  1  a  PP  a  PM+256 a  XP+75+ZP  a  1 40+XP*2-YP  >  =  K=USR  <  1 536  a  2  a  00  a  PM+5 1 2  a  XP+75+ZP 
a 140+XP*2> 

180  IF  ZF'<2  OR  ZP> 75  THEH  GOSUB  500 
490  GOTO  50 

500  REM . GLL. 

510  IF  ZK <0  HHD  ABS<XP-X1 >  <3  THEH  540 
520  IF  ZK>0  AND  ABS< XP-X2> <3  THEH  548 
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536  GOTO  60O 
340  GOSUB  9500 

550  IF  XP>10  THEN  XK*=-RND < 0 > *2 
560  iF  XP  <18  THEN  XK=RND<0>*2 
570  ZK--ZK 
580  RETURN 

600  REM  . . . OUt  . 

6 ì  0  XP=XP+XK* <  XP> W  AND  XP <20 >  =  YP==YP+ABS < YK >  =  ZP=ZP+ZK  =  K=USR  < 1 536 , 1 , PP , PM+256 , XP+7 
5+ZP..  14'0+XP*2 VP) 

620  SOUND  0.ZP+80, 10, I NT < RND < 0 > *3 >  +2 : I F  ZP>-60  AND  ZPC130  THEN  610 
630  SOUND  0. 0,8.0  •  - 

640  IF  ZK <0  THEN  P2=P2+1 
650  IF  ZK> 0  THEN  P1=P1+1 

660  POKE  87,0  =  POSI TION  0, 13  =  F*RINT  ,l  PLAYER  1  PLAYER2  ",P1;M  " ; P2  =  P 

ORE  87,7 

670  XP= 1 1  YP= 1 = ZP=30  =  XK=0 . 5  =  YK* 1 
680  IF  ZK <0  THEN  ZK=ZK~0.  1 
690  IF  ZK> 0  THEN  ZK=ZK+8. 1 
700  ZK=~ZK 

710  IF  P 1  > F‘2  THEP:  HI*P1 

720  IF  P2> P 1  THEN  HI=P2 

730  IF  HI<PT  THEN  GOTO  50 

740  FQR  T= 1  TO  1000= NEXT  T  =  GOTO  9400 

9000  REM  . SCRN 

9010  R AM=PEEK < 1 06 > -16  =  POKE  106, RAM 

9020  GRAPH I CS  23  =  SETCOLGR  0 ,0,10  =  SETCOLOR  1,12,4* SETCOLOR  2 , 1 2 , 2  * SETCOLOR  4 , 2 , 6  = 
POKE  752,1= POKE  82,0 

9030  DL===PEEK<560)+PEEK(561  >*256  =  POKE  DL+18,6  =  P0KE  DL+19,6 

9040  POKE  87,0= POSI TION  8,13=PRINT  "  XPONG  BY  MAP",=POKE  87,7 

9050  COLOR.. 3  =  FQR  K==0  TO  2  =  PLOT  30, 51+K  =  DRAWTO  50,  71+K  =  DRAWTO  130,  71+K  =  NEXT  K 

9060  COLOR  2  =  FOR  X=38  TO  110  =  PLOT  X, 50  =  DRAWTO  X+20,70  =  NEXT  X 

9070  COLOR  1 =  PLOT  70, 50  =  DRAWTO  90, 70  =  PLOT  7 1,50  =  DRAWTO  91,70 

9080  COLOR  0  =  PLOT  0,0 

9100  REM . L.M. 

9110  FOR  A* 1536  TO  1606  =  READ  B  =  POKE  A , B  =  NEXT  A 

9120  DATA  104, 104, 104, 170, 104, 141,58,6, 104, 141,57,6, 104, 141,49,6, 141,61,6, 104, 14 
1,48,6, 141,60,6 

9 1 38  DATA  1 04 , 1 84 , 1 57 , 8 , 208 , 1 04 , 104, 141,71 , 6 , 1 62 , 0 , 1 60 , 0 ,169, 0 , 204 ,71,6, 240 ,9,1 5 
3,8, 0 , 200 ,  1 92 , 255 , 208 ,  243 , 96 

9 1 40  DAT A  1 89 ,0,0,1 53 , 0 , 8 , 280 , 232 , 224 , 28 , 208 , 244 , 76 , 48 , 6 

9208  REM  . DATI 

9218  DIM  R$ < 28 ) ,  PT < 28 > ,  0$ < 28 > 

9220  FOR  A=1  TO  28  =  READ  B  =  R$ < A , A  > ==CHR$  <  B  >  = NEXT  A 

9230  DATA  68, 126, 255,  255, 255, 255, 255, 255, 255, 255,  255,  255, 255,  255, 255,  255,  126, 60, 
24 , 24 , 24 , 24 , 24 , 24 , 24 , 24 , 24 , 24 

9248  FOR  A==l  TO  28  =  READ  B  =  P$  <  A ,  A  >  ==CHR$  <  B  >  =  NEXT  A 

9258  DATA  24 , 60 , 68 , 60 , 68 , 24 , 8 , 6 , 0,0, 0 , 0 ,0,8 , 8 , 8 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 8 , 0 , 8 , 8 , 0 , 8 
9260  FOR  0=1  TO  28  =  READ  B  =  0$ <  A , A  >  ==CHR$  < B > =  NEXT  A 

9270  DATA  0,0. 0 ,  0 . 24 , 24 , 0  l  0 ,0.0. 0 ,  0 ,0.0 ,  0 ,  0 . 0,  0  ;  0 . 0 ,  0 ,  0 ,  0 ,  0  ;  0 0 ,  0 0 
9300  REM  . . SÉTP 

9318  POKE  54279, RAM = POKE  559, 62= POKE  53277, 3= POKE  704, 14= POKE  785, 18= POKE  786,8= 
POKE  707, 14= POKE  623,1 

9320  RR=ADR < R$ >  =  PP=ADR < P$ >  =  00*ADR < 0$  >  =  PM= < RAM+4 >  *256 
9480  REM  . WAIT 

9418  POKE  87,8= POSI TION  8,13=PRINT  "  READY.  "POKE 

87,7 

9420  IF  STRIGC0) <>0  THEN  GOTO  9428 

9430  POKE  87,0= POSI TION  0, 13=PRINT  "  PLAYER 1  PLAYER2  8  8" = POKE  87 

9440  GOTO  10 

9580  REM . » . SND. 

9510  FOR  V* 1 2  TO  0  STEP  -2 
9520  SOUND  8,80, 10, V 
9530  NEXT  V 
9548  SOUND  0,0, 0.8 
9550  RETURN 


10-20 

50-180 

60-120 

130-170 

180 

500-580 

600-740 


9000-9080 

9100-9140 

9200-9270 

9300-9320 

9400-9440 


9500-9550 


COMMENTO  AL  LISTATO  (XPONG) 

Variabili  usate  nel  gioco 
Routine  principale 

Controllo  dei  joystick  e  movimento  delle  racchette 

Movimento  della  palla  e  dell’ombra,  gestione  del  rimbalzo  e  della 

direzione 

Controlla  se  la  palla  ha  raggiunto  uno  dei  lati  del  tavolo 
Verifica  se  la  racchetta  ha  colpito  la  palla,  se  si  inverte  la  direzione 
della  palla,  altrimenti  prosegue  da  600 

La  palla  non  è  stata  “presa”,  con  un  ciclo  viene  fatta  scomparire,  il 
punteggio  viene  attribuito  e,  se  non  è  il  punteggio  limite,  riposizio¬ 
na  le  coordinate  della  palla  e  ritorna  al  ciclo  principale 
Qui  viene  definito  lo  schermo,  cambiate  le  due  linee  di  display  list 
e  disegnato  il  tavolo 

Vengono  inseriti  i  dati  della  routine  in  linguaggio  macchina  nello 
locazioni  1536-1606 

I  dati  delle  figure  vengono  depositati  nelle  3  stringhe:  R$  per  la 
racchetta,  P$  per  la  palla  e  0$  per  la  sua  ombra 
Preparazione  della  grafica  player  missile 
Stampa  la  scritta  “ready”.  Quando  il  primo  giocatore  preme  il  tasto 
del  suo  joystick,  appaiono  i  punteggi  e  il  controllo  passa  alla  routi¬ 
ne  principale 

Generazione  del  suono  di  rimbalzo 


106,  in  modo  da  riservare  lo  spazio  suffi¬ 
ciente  alla  grafica  player  missile,  inserire 
una  linea  che  inizializzi  la  suddetta  grafi¬ 
ca  e,  infine,  inserire  i  dati  della  routine  in 
linguaggio  macchina  a  partire  dalla  loca¬ 
zione  1536  compresa. 

Per  richiamare  la  routine  si  adotta  un’i¬ 
struzione  del  tipo: 

X  =  USR  (1536,  numero  del  player,  area 
dati  della  figura,  area  di  memoria  del 
player  n.  N,  coordinata  X,  coord.  Y). 

La  routine  si  occuperà  automaticamente 
di  mantenere  pulita  la  zona  di  memoria 
di  ogni  singolo  player,  senza  lasciare  fa¬ 
stidiose  “scie”  nel  movimento  o  pixel 
"vaganti”. 

Per  modificare  la  routine  secondo  le  vo¬ 
stre  necessità,  potete  variare  l’altezza 
della  figura  che,  nel  caso  del  gioco,  è  fis¬ 
sata  a  28  pixel,  ma  che  può  essere  dimi¬ 
nuita  o  aumentata  a  vostro  piacimento, 
da  un  minimo  di  un  pixel  a  un  massimo  di 
circa  255  pixel,  mettendo  il  valore  scelto 
al  posto  del  28  (sesto  dato  a  partire  dal 
fondo,  tra  i  DATA  che  seguono  il 
REM...  L.M.). 

Il  gioco  che  utilizza  questa  routine,  è  una 
semplice  simulazione  di  ping  pong,  alleg¬ 
gerito  dalle  sue  molteplici  regole  e  carat¬ 
teristiche,  nel  quale  voi  dovrete  sempli¬ 
cemente  non  farvi  sfuggire  la  pallina  che 
da  lenta  diventerà,  con  l’aumentare  dei 
punteggi,  sempre  più  veloce. 

Lo  schermo  raffigura  un  piccolo  tavolo 
da  gioco  con  visione  tridimensionale  (!!!) 
ed  i  punteggi.  Le  figure  realizzate  in  gra¬ 
fica  P-M  sono  rappresentate  dalle  due 
racchette,  dalla  pallina  e  dalla  sua  om¬ 
bra.  Il  modo  grafico  scelto  è  il  7,  senza 
finestra  testuale,  con  una  variazione  di 
due  linee  nel  display  list,  in  modo  da  po¬ 
ter  visualizzare  messaggi  quali  il  punteg¬ 
gio,  la  scritta  “READY”  e  l’intestazione. 
Per  giocare  bisogna  essere  in  due,  inseri¬ 
re  i  joystick  personali  e,  per 
iniziare,  premere  il  fire  del  joystick  inse¬ 
rito  nella  porta  1. 

Il  punteggio  limite  è  15,  ma  può  essere 
facilmente  cambiato  sostituendo  alla  li¬ 
nea  20  il  valore  15  della  variabile  PT,  con 
un  altro  da  voi  preferito,  stando  attenti  ai 
tragici  effetti  che  avrà  sulla  velocità  della 
pallina,  se  fisserete,  ad  esempio,  un  pun¬ 
teggio  massimo  di  30  (velocità  che  si  rea¬ 
lizzerà,  oltretutto,  con  scatti  felini). 
Naturalmente,  vincerà  chi  raggiungerà 
per  primo  tale  punteggio. 

Questo  gioco  non  è  senz’altro  il  meglio 
che  si  possa  realizzare  nel  genere,  soprat¬ 
tutto  per  la  velocità;  un  programma  a 
livello  più  alto  lo  potete  trovare  tra  le 
vostre  miriade  di  giochi,  senza  però  capi¬ 
re  come  è  stato  realizzato!  Questo,  inve¬ 
ce,  vuole  rappresentare  un  modesto 
esempio  di  quello  che  si  può  ottenere  con 
la  grafica  player-missile,  una  semplice 
routine  e  delle  basi  essenziali  di  pro¬ 
grammazione  che  ognuno  di  voi  può  fa¬ 
cilmente  raggiungere. 
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LISTATI 


DI  EMANUELE  BERGAMINI 


FRACTAl 

MAKER 


UN  PROGRAMMA  IN  BASIC  PER 
GENERARE  FRATTALI  A  PIACERE 


Beniot  B.  Mandelbrot,  un  ricerca¬ 
tore  della  IBM,  ha  recentemente 
sviluppato  un  particolare  campo 
dello  studio  delle  forme  geometriche  che 
ha  chiamato  GEOMETRIA  FRATTA¬ 
LE.  Una  delle  sue  proprietà  è  quella  di 
poter  essere  rappresentata  graficamente 
con  risultati  sorprendenti.  In  questo  arti¬ 
colo  ci  occuperemo  di  esplorare  un  parti¬ 
colare  insieme  di  numeri  complessi  chia¬ 
mato  appunto  Insieme  di  Mandelbrot. 
Innanzitutto  occorre  una  piccola  premes¬ 
sa  su  alcun  concetti  matematici,  primo 
tra  tutti  il  concetto  di  numero  complesso. 
Un  numero  complesso  è  un  numero  com¬ 
posto  da  una  parte  reale  e  una  parte  im¬ 
maginaria,  indicata  dal  simbolo  “i”.  7+3i 
è  un  numero  complesso,  così  anche  —  6i  e 
7-14i.  Ogni  numero  complesso  può  esse¬ 
re  rappresentato  sul  cosiddetto  Piano 
Complesso  (simile  al  piano  cartesiano), 
dove  l’origine  è  data  dal  numero  com¬ 
plesso  O+Oi,  la  parte  reale  individua  la 
coordinata  X,  mentre  la  parte  immagina¬ 
ria  individua  la  coordinata  Y. 

Per  sommare  due  numeri  complessi  ba¬ 
sta  fare  la  somma  delle  due  parti  separa¬ 
tamente,  mentre  per  moltiplicarli  occor¬ 
re  procedere  come  nell’algebra  ordina¬ 
ria,  sapendo  però  che  i  i2  è  uguale  a  -1. 
La  dimensione  di  un  numero  complesso 
è  la  distanza  sul  piano  tra  esso  e  l’origine, 
ricavata  applicando  il  Teorema  di  Pitago¬ 
ra  ai  lati. 

Torniamo  al  nostro  insieme.  Quando  ap¬ 
plichiamo  ai  numeri  una  certa  funzione 
ricorsiva,  quelli  che  sono  all’esterno  del¬ 


l’insieme  scappano  all’infinito,  mente 
quelli  all’interno  ondeggiano.  La  parte 
più  suggestiva  è  la  zona  di  margine. 

La  funzione  applicata  è:  Z=Z2+C,  dove 
Z  è  un  numero  complesso  arbitrario 
mentre  C  è  un  numero  del  piano.  Conti¬ 
nuando  ad  applicare  la  stessa  funzione,  il 
numero  tenderà  ad  aumentare,  fino  a  su¬ 
perare  la  capacità  matematiche  del  no¬ 


stro  Atari.  Fortuntamente  i  numeri  che 
stanno  nell’insieme  di  Mandelbrot  sono 
tutti  i  numeri  C  che  hanno  dimensione 
finita  anche  dopo  numerose  iterazioni, 
così  possiamo  comodamente  escludere 
gli  altri. 

Passiamo  al  nostro  programma.  Per  po¬ 
terlo  usare  bisogna  avere  un  disk  drive  e 
un  Atari  XL  o  XE,  infatti  non  funziona 
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correttamente  sui  vecchi  400  e  800  man¬ 
canti  del  tasto  HELP. 

Il  menu  presenta  7  opzioni.  Vediamo  di 
esaminarle  una  ad  una: 

FORMAT  DISK  -  serve  a  formattare  un 
dischetto.  Non  vengono  fatti  controlli, 
quindi  inserite  un  disco  vergine. 
DIRECTORY  -  visualizza  la  directory 
completa  del  disco. 

FINE  PROGRAMMA  -  termina  l’ese¬ 
cuzione  del  programma.  Viene  chiesta  la 
conferma  della  decisione. 

CREA  FRATTALE  -  questa  è  l’opzione 
principale.  Per  creare  un  frattale  bisogna 
inserire  una  serie  di  parametri  iniziali: 
per  il  campo  del  frattale,  che  ha  una  for¬ 
ma  quadrata,  bisogna  indicare  l’angolo 
inferiore  sinistro  come  un  numero  com¬ 
plesso  (x= parte  reale,  y=  parte  imm.), 
seguito  dalla  misura  del  lato.  Poi  si  deve 
inserire  il  nome  del  frattale  (max  8  car.) 
che  verrà  poi  utilizzato  per  salvare  il  frat¬ 
tale  su  disco.  NON  usate  estensioni  o  no¬ 
mi  di  periferiche. 

CONTINUA  FRATTALE  -  serve  a 
continuare  un  frattale  che  è  stato  inter¬ 
rotto.  Vengono  visualizzati  i  nomi  dei 
frattali  incompleti  presenti  sul  dischetto 
e  viene  richiesto  il  nome  del  frattale  da 
continuare.  Premendo  solo  RETURN  si 
torna  al  menu  principale. 

VEDI  FRATTALE  -  visualizza  uno  dei 
frattali  presenti  sul  disco. 

CAMBIA  COLORI  -  seleziona  il  colore 
di  sfondo  del  disegno  e  il  tipo  di  grafica. 
La  monocromatica  è  la  grafica  9,  dove  i 
colori  sono  le  diverse  luminosità  delle 
sfondo,  mentre  il  modo  multicolor  corri¬ 
sponde  alla  grafica  11,  dove  cambiano  i 
colori  che  però  hanno  tutti  la  stessa  lumi¬ 
nosità  dello  sfondo. 

Andiamo  più  a  fondo:  il  tracciamento  di 
un  frattale  viene  fatto  nella  procedura 
DISEGNO  (linee  960-1040),  dove  viene 
considerato  ogni  punto  nel  campo.  C  e  D 
contengono  il  valore  del  punto  in  esame 
riferito  a  X  e  Y  che  sono  le  coordinate 
dello  schermo.  Il  frattale  viene  utilizzato 
in  un’area  di  80X180  pixel. 

Per  ogni  punto  viene  chiamata  la  proce¬ 
dura  PUNTO  (linee  800  -  870)  che  si  oc¬ 
cupa  di  stabilire  se  il  punto  fa  parte  del¬ 
l’insieme.  In  essa  infatti  viene  eseguita 
l’iterazione  della  funzione  fino  a  che  il 
contatore  non  raggiunga  75  o  la  dimen¬ 
sione  superi  2. 

Tutti  i  punti  con  dimensione  maggiore  di 
2  sono  fuori  dall’insieme,  perché  dopo 
poche  iterazioni  andrebbero  all’infinito. 
Tutto  l’insieme  di  Mandelbrot  è  quindi 
compreso  nel  range  +-2. 

Con  i  parametri  -2,  —1.25,  2.5  possiamo 
visualizzarlo  completamente.  Il  numero 
di  iterazioni  massime  è  fissato  a  75,  per 
facilità  e  brevità  di  calcolo,  ma  il  progra¬ 
ma  resta  comunque  molto  lento.  La 
proc.  DISEGNO  si  occupa  anche  di  con¬ 
trollare  lo  stato  dei  tasti  HELP  e  SE- 
LECT.  Premendo  HELP  si  interrompe  il 


listato  fractrl  maker 

10  REM  + - - --+ 

20  REM  +  FRACTRL  MAKER  <  XL-'XE  )  + 

30  REM  +  V  ì . 4  1 1 , 04 , 8  ?  By  EMASOFT  + 

40  REM  +  per  La  Rivista  di  ATARI  + 

50  REM  + — * - - - * - ■ + 

m  POKE  65  •  0 :  GOSUB  13AFi 

70  DIM  FRS < 8 } , F I S < 1 6 > , RS < 1 > , 0 1 $ < 20 > 

80  D I M  e 1 0$ < 7 )=CI 0S= " hhh 1  =  C I OS < 4  ) =CHRS  < 1 70 > *  C I OS <  5 > » “LV “ : C I OS < 7 > =CHRS < 228 > 

90  GR=3 

100  POKE  82, 0  =  GRAPHICS  &■-?  "  FRACTRL  MAKER  XL -  MENU  OPZIONI  "  :  POKE  710,2 

24 : REM  IN  INVERSO 

llù  POKE  82,5;?  • ?  "10  CREA  UH  NUOVO  FRATTALE" : ?  "20  CONTINUA  UN  FRATTALE" : ?  "30 
CARICA  UN  FRATTALE" 

120  ?  "40  CAMBIA  COLORI"  =  ?  "50  DIRECTORY** :  ?  "60  FORMAT  DISK":?  -73  FINE  PROGRAMM 
A": POKE  82,0:?  : '?  "SCEGLI:".; 

130  CL0SE  #3  :  OPEN  #3, 4, U, "K = " = GET  #3, K = K=K~4S : CLOSE  #3= IF  K<1  OR  K>7  THEN  ?  CHRS 
<253) j «GOTO  130 

140  ?  K :  IF  K <> 7  THEN  17© : REM  Procedura  FINISCI - * - - - 

150  POKE  702, 64  FRI NT  CHRS ( 253 > .; "SEI  SICURO?  <S/N) " ; : INPUT  RS=IF  NOT  <RS="S"  OR 

RS= " N " >  THEN  150 

160  IF  RS="S"  THEN  710 

170  IF  KOS  THEN  278*=  REM  procedura  DIRECTORY - - - 

1 80  CLOSE  #2  :  OPEN  #2 , 6 , 0 , " D  =  % . * " : TRAP  260 

1 30  POKE  710,0: POKE  709 ,15  =  ?  CHRS < 1 25  > , "  D I RECT0RY  "  =  ?  :  REM  I N  I NVE 

RSO 

208  ?  "  L  Fi lenarne  Ext  Bytes"  : POKE  82,1:? 

210  DD= 1 : POKE  752,1 

220  INPUT  #2,  DIS  :  IF  DIS <2, 2)0  "  "  THEN  POKE  82,0:?  =  ?  VAL  <  D I S  <  1,3)  >  T 1 28 "  Bytes 
d i s poti i h i li "  : GOT 0  260 

239  ?  D I S <  1 , 2 > : POKE  85,4  =  ?  DIS<3, 10) ;  =  POKE  85,12  =  ?  ";DIS<11,  13);  =  DIS=STRS<  128 

TVfìL  <  D I S  <  1 5 , 17))) 

248  POKE  85,24-LEN<DIS)=?  DIS = DD=DD+1  IF  DD=15  THEN  POKE  82, 8= GOSUB  738= GOTO  138 
250  GOTO  220 

260  CLOSE  #2= GOSUB  730= POKE  82,0 

270  IF  K<>3  THEN  340  =  REM  Procedura  CARICA  DISEGNO - — ~ - 

280  ?  .."FRATTALI  DISPONIBILI:":?  =  OPEN  #2, 6, 0,  "D  =  *.  FI  "  =  2=0 

230  INPUT  #2, DIS  = IF  DIS<2,2>="  "  THEN  W=INT<Z/4> =Q=Z~<W*4> = POSITION  18*Q, 15+W=? 

D I S  <  3 , 1 0  > : Z*Z+ 1  :  GOTO  230 

300  CLOSE  #2  = IF  Z=0  THEN  f  "NESSUN  FRATTALE  SU  QUESTO  DISCO. "= GOSUB  730  =  GOTO  100 
310  TRAP  100  =  ?  =  ?  "NOME  DEL  FRATTALE  =  " .;  =  INPUT  FRS = GOSUB  780=  IF  FRS=""  THEN  100 
320  GRAPHICS  GR • POKE  712, CC= GOSUB  33© 

330  GOSUB  738 

340  IF  KOI  THEN  468  =  REM  procedura  CREA  FRATTALE - - - - - 

350  TRAP  100= POKE  710,132=?  CHRS <125) ; "  INTRODUZIONE  PARAMETRI  DI  CAMPO 
■  ?  : REM  IN  INVERSO 

368  ?  "ANGOLO  SUD-OVEST":?  =?  "PARTE  REALE  =";= INPUT  ANGR  =  ?  =?  "PARTE  IMM.  =";=I 
NF'UT  ANGI  =  ? 

370  ?  "LATO  =".::  INPUT  LATO  =  DR=LATO/80  =  DT=LAT0/ 180  =  ? 

38©  ?  "NOME  DEL  FRATTALE?":?  "<file  dest. )  =";= INPUT  FRS = GOSUB  788= IF  FRS=""  THE 
N  100 

330  GRAPHICS  GR  =  POKE  712, CC 

400  GOSUB  1148 

410  ;*;=0  :  Y=0  :  POKE  732,0 

42©  GOSUB  370 

438  GOSUB  838 

448  IF  K=S0  THEN  TRAP  450 = FIS<LEN<FIS) )="2" = XIO  33, #3, 8, 8, FIS 
450  GOSUB  738 

460  IF  K<>2  THEN  680* REM  Procedura  CONTINUA  FRATTALE  - 

478  ?  , "FRATTALI  DISPONIBILI:":?  = OPEN  #2,6, 0, "D = *. F2" = Z=0 

480  INPUT  #2,  DIS  :  IF  DIS<2,2)="  "  THEN  M=  I  NT  <  2x4  )  =  Q=2~  <  W*4  )  •  POS  ITI  OH  lflQ,15+M  =  ? 

D I S  <  3 , 1 0 ) : Z=Z+ 1  :  GOTO  488 

438  CLOSE  #2  = IF  2=8  THEN  ?  "NESSUN  FRATTALE  INCOMPLETO  SUL  DISCO. "= GOSUB  738  =  GOT 
0  188 

580  TRAP  100:?  =  ?  "HOME  DEL  FRATTALE  =  ,  = INPUT  FRS=IF  FRS=""  THEN  108 
510  GOSUB  780  =  F IS  <  LEN  <  F I S ) )  =  " 2 " 

528  CLOSE  #4= OPEN  #4, 4,0, FIS 
530  INPUT  #4 X , Y , DR , DT , ANGR , ANG I 
540  CLOSE  #4= POKE  732, 8= GOSUB  780 
558  GRAPHICS  GR = POKE  712, CC? GOSUB  330 
560  GOSUB  370 
570  GOSUB  838 

580  IF  X*80  THEN  TRAP  590 = FIS<LEN<FIS) )="2" = XIO  33, #3, 0, 0, FIS 
590  GOSUB  730 

608  IF  K Q 4  THEN  670  =  REM  procedura  CAMBIO  COLORI  — — — - — — - 

610  TRAP  610  =  ?  =  ?  "COLORE  DI  SFONDO?  <0/255)  ";= INPUT  C 
620  IF  C<0  OR  0255  THEN  ?  CHRS <253); UPS <1, 2) ;=  GOTO  610 
630  TRAP  33333 =CC=C 

648  TRAP  640:?  : ?  "URO  DI  GRAFICA?":?  "XI  MONOCROMATICA":?  "23  MULTI COLOR" = INPU 
T  C 

650  IF  C<1  OR  02  THEN  ?  CHRS <253); UPS <1, 5) ;=  GOTO  640 
668  TRAP  33333 = GR=9+2*<C=2> 

678  IF  K<>6  THEN  700 = REM  procedura  FORMAT  DISK  - 

680  ?  =  ?  "INSERISCI  UN  DISCO  VUOTO  NEL  DRIVE  1." -GOSUB  730 
630  TRAP  680  =  XIO  25*4,  #3, 0, 0,  "0  =  " 

708  GOTO  100 

710  GRAPHICS  0 : END  : REM  FINE  PROGRAMMA  - 

728  REM  Procedura  ATTESA  - 

730  POKE  752,  1  IF  PEEK<87)=0  THEN  ?  =?  "PREMI  START  PER  CONTINUARE".;  =  REM  "  STA 
RT  "  IH  INVERSO 

748  IF  PEEK< 53279)  06  THEN  740 
750  IF  PEEK<87>=0  THEN  ?  CHRS <156) 

760  POKE  752,0= RETURN 

779  REM  procedura  NOMEFILE - — - — - - - - 

780  F I S= " D : " : F I S  <  LEN  <  F I S )  + 1 )=FRS  =  F I S  < LEN  <  F I S )  + 1 )  =  " . F 1 " 

738  RETURN 

808  REM  procedura  PUNTO  - 

810  DI=0:AP=0:BP=0:CO=0 
820  C0=C0+1 

830  NH=APTHP-BPSBP  =  NB*2W*BP 
840  RF-NA+C  =  BP=NB-K) 

850  D I =SQR  <  APTRP+BP YBP ) 

860  IF  NOT  < C0=75  OR  DI >2)  THEN  820 
870  RETURN 
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888  REM  procedura  SALVA  PICTURE  - 

890  POKE  559 , 34  =  TRfìP  918  =  CLOSE  # 1 =  OPEN  # 1 , 8 , 8 , F I $ 

908  I QCB= 1 = TV RE- 1 1 =  GOSUB  1 230  =  XX=USR <  ADR <  C 1 0$ > , I OCB* 1 6 > 

918  CLOSE  #1= RETURN 

928  REM  Procedura  CRRICfi  PICTURE  - - - 

938  TRAP  958  =  CLOSE  #  1  =  OPEN  #1.4..  0 ,  F I  $ 

940  I  OCB=  1 :  TYPE=7  =  GOSUB  1 238  =  XX=USR  <  ADR  <  C 1 0$  > ,  I OCB* 1 6  > 

950  CLOSE  #1= RETURN 

960  REM  Procedura  DISEGNO  - 

970  IF  PEEK <: 53279 > =5  THEN  POKE  559, 34-PEEK<559> 

988  C=ANGR+X*DR = D=RNG I +Y*DT 

998  GOSUB  8 1 0 :  COLOR  C0-‘5  :  PLOT  X,  V 

1000  Y=Y+1  IF  Y= 1 80  THEN  Y=0=X=X+1 

1810  IF  PEEK < 732 >  THEN  GOSUB  1868= GOTO  1848 

1020  IF  X=80  THEN  1040 

1030  GOTO  978 

1040  RETURN 

1850  REM  Procedura  NONFINE  - 

1068  GOSUB  788 
1 070  F I  *  < LEN < F I $ > >  =  "2" 

1088  TRAP  1108= CLOSE  #4= OPEN  #4, 8, 8, FI $ 

1 890  ?  #4 X  ;  "  ,  " ,  Y  ;  " ,  " ,  DR DT  ;  "  ,  "  ;  fìNGR  ;  "  ,  "  ;  ANG I 
1100  CLOSE  #4 
1110  GOSUB  788 
1120  RETURN 

1 1 38  REM  p  rocedu.  r a  GR I  GL  I A - 

1140  COLOR  15 

1150  FOR  XX=0  TO  48  STEP  5 

1168  FOR  YY=U  TO  90  STEP  10 

1 1 7G  PLOT  XX , YY  =  PLOT  XX , 1 79- YY 

1 1 88  PLOT  79-XX , YY  =  PLOT  79-XX , 1 79- YY 

1190  NEXT  YY 

1200  NEXT  XX. 

1210  RETURN 

1228  REM  setta  parametri  i--'o-Picture  - 

1 238  BL0CK=832+ 1 OCB* 1 6  =  LN=7680 
1 248  L=LN  =  H= I NT  < L-  256 > = L=L-256*tì 
1250  POKE  BLOCK+2, TYPE 

1 268  POKE  BLOCK+5 , PEEK  < 89  > =  POKE  BLOCK+4 , PEEK  < 88 > 

1278  POKE  BLOCK+9, H : POKE  BLQCK+8,L 
1288  RETURN 

1290  REM  procedura  TITOLO - 

1 308  POKE  82 , 8  =  GRAPH I CS  2  =  POKE  752 , 1 = POS I T I ON  6 , 4  =  ?  #6 ; " f racta 1 " = POS I T I ON  7,6  =  ? 
££  ;  "  r.1RKER  " 

1310  COLOR  139  =  PLOT  0,0  =  DRAWTO  19,0  =  DRAWTO  19,9  =  DRAWTO  8,9  =  DRRWT0  0,0 
1328  POKE  710,8= POKE  709,30  POKE  788,154 

1 330  D I M  UPT  <  6  )  =  UPT  <  1  >  =CHR$  <  28 )  =  UPT <  6  >  =CHR$  <  28 >  =  UP$  <  2  >  =UP$ 

1348  ?  CHR$< 125)  =  ?  "  PREMI  START  PER  INIZIARE. " = REM  "  START  "  IN  INVERSO 
1 358  POKE  708 , PEEK < 20  >  =  POKE  711, PEEK < 19 ) = POKE  709 , 255-PEEK < 28 ) 

1368  IF  PEEK (53279 >06  THEN  1350 
1378  RETURN 


In  apertura 
l'immagine  di  un 
frattale.  Qui  sopra  il 
menu  principale  di 
Fractal  Maker 


disegno,  che  viene  salvato  incompleto, 
sarà  possibile  continuarlo  in  un  secondo 
tempo  con  l’opzione  CONTINUA.  Il  ta¬ 
sto  SELECT  funziona  da  toggle  per  lo 
schermo,  cioè  serve  a  abilitarlo  o  a  disa¬ 
bitarlo.  Con  lo  schermo  disabilitato  il 
computer  lavora  più  velocemente. 
Poiché  il  controllo  sul  tasto  SELECT  vie¬ 
ne  effettuato  solo  una  volta  per  ogni  pun¬ 
to,  può  capitare  che  dobbiate  tenere  per¬ 
muto  il  tasto  per  qualche  secondo  prima 
che  inverta  lo  schermo.  Per  il  tasto 
HELP  invece  questo  problema  non  sussi¬ 
ste  perché  la  locazione  732  non  viene 
riazzerata  quando  viene  rilasciato  il  ta¬ 
sto.  Basta  premerlo  per  un  istante,  anche 
se  il  salvataggio  verrà  fatto  qualche  se¬ 
condo  dopo. 

Il  colore  del  punto  viene  attribuito  in 
funzione  del  valore  del  contatore.  I  punti 
esterni  sono  neri,  e  sono  quelli  più  rapidi 
da  calcolare. 

Un’immagine  viene  salvata  in  formato 
non  compatto,  a  62  settori,  quindi  com¬ 
patibile  con  i  maggiori  programmi  grafi¬ 
ci.  L’immagine  viene  salvata  in  un  file 
con  l’estensione  FI .  Inoltre  se  il  frattale  è 
incompleto  viene  creato  un  frattale  con 
l'estensione  F2  che  contiene  i  parametri 
di  quando  si  è  interrotto  il  disegno. 

Le  operazioni  di  I/O  vengono  effettuate 
usando  una  routine  che  utilizza  una  chia¬ 
mata  al  CIO,  che  potrebbe  essere  il  sog¬ 
getto  di  un  prossimo  articolo. 

La  procedura  GRIGLIA  traccia  una  gri¬ 
glia  punteggiata  sullo  schermo  per  poter 
vedere  a  che  punto  dello  schermo  è  arri¬ 
vata  l’esecuzione. 

Dopo  che  un’immagine  è  stata  completa¬ 
ta  oppure  è  stata  salvata  con  HELP  o 
richiamata  con  l'opzione  3,  il  programma 


CODICI  PROOF  FRACTAL  MAKER 


1 

LINE# 

CODE  1 

LINE# 

- +. 

CODE  ! 

LINE# 

CODE 

+ 

1 

1 

10 

0222  1 

28 

7871  1 

30 

9100 

! 

1 

40 

8867  ! 

58 

0226  ! 

60 

3939 

! 

1 

70 

1517  1 

88 

7050  ! 

90 

1708 

1 

1 

100 

2777  1 

110 

5248  1 

120 

2725 

1 

! 

138 

4755  1 

148 

1439  1 

150 

3018 

1 

! 

160 

4070  1 

170 

0629  1 

180 

7040 

1 

1 

190 

9369  1 

200 

8491  i 

210 

0669 

! 

1 

220 

6655  1 

230 

5326  1 

240 

4533 

1 

1 

258 

4391  1 

260 

1055  ! 

270 

3555 

1 

1 

280 

8835  ! 

298 

3154  1 

300 

7998 

1 

1 

310 

9370  1 

320 

3710  1 

330 

5270 

1 

1 

340 

2678  1 

358 

5098  1 

360 

5510 

1 

! 

370 

5884  1 

380 

6475  1 

390 

3505 

1 

1 

400 

5899  1 

418 

4521  1 

420 

5339 

1 

! 

438 

5354  1 

448 

3067  1 

450 

5275 

1 

! 

468 

9437  1 

470 

8888  1 

480 

3255 

1 

1 

498 

6297  1 

500 

3862  1 

510 

6715 

1 

! 

520 

2285  1 

538 

4930  1 

540 

3379 

1 

1 

558 

3718  ! 

568 

5348  1 

570 

5363 

1 

1 

588 

3195  ! 

598 

5284  1 

600 

3008 

! 

1 

610- 

1857  1 

620 

7263  1 

630 

1235 

1 

! 

640 

8189  1 

650 

1498  1 

660 

0664 

1 

1 

670 

0912  ! 

680 

8635  ! 

690 

7010 

1 

1 

700 

4354  1 

718 

1501  1 

720 

9606 

! 

! 

730 

6979  1 

748 

6419  1 

750 

3045 

1 

1 

768 

5411  1 

778 

0882  ! 

780 

0252 

1 

1 

798 

4051  1 

800 

9553  1 

810 

6953 

1 

1 

820 

3880  1 

830 

7470  1 

840 

2065 

1 

1 

858 

7323  ! 

860 

6537  1 

870 

4048 

! 

1 

888 

910 

4793  1 

890 

9803  ! 

900 

535  i 

O  -1 

1 

» 

1 

3033  1 

926i 

5043  ! 

930 

1 

1 

948 

2256  1 

950 

3641  ! 

960 

3330 

7029 

! 

1 

1 

970 

5 1 24  ! 

! 

980 

5222  1 

1 

990 

! 

1 

20 


CODICI  FRRCTHL  PARTE  2 


I  LINE#  CODE  !  LINE#  CODE  I  LINE#  CODE  ! 


I  1010  5975 
I  1040  4743 
I  1070.  2939 
I  1100  5094 
I  1130  0821 
!  1160  2365 


I  1020  4142  I 

I  1050  1146  I 

!  1080  3845  I 

!  1110  6126  ! 
1140  5378  I 

1170  1791  I 


I  1000  6793 

I  1030  5243 

I  1060  6139 

!  1090  0064 

!  1120  4739 

!  1150  1059 

I  1180  3785 

I  1210  4738 

!  1240  1116 

!  1270  7878 

!  1300  4165 

I  1330  6841 

!  1360  9653 


!  1190  5448  i 

I  1220  1481  ! 

!  1250  6866  I 

!  1280  4759  ! 

I  1310  0653  ! 

I  1340  5457  1 

I  1370  4758  I 


1200 

5400  1 

1238 

7701  1 

1260 

2167  1 

1290 

1319  ! 

1320 

6077  1 

1350 

2310  ! 

I 


LISTING  2 

45  REM  *  LINEE  PER  DOPPIA  PRECIS.  % 
860  IF  NQT  < CO- 150  OR  DI>2>  THEN  820 
990  GOSUB  810  COLOR  CO/10  PLOT  H,Y 


I  LINE#  CODE  !  LINE#  CODE  !  LINE#  CODE 


I  45  1068  I  86©  8345  I  990  8763 
!  I  ( 


LISTING  3 

45  REM  *  LINEE  PER  PIXEL  QUADRATI  * 

280  ?  ,  " FRATT AL I  D I SPON IBILI :  :  ?  =  OPEN  #2 , 6 , 0 .■  "D :  F3 n  =  Z=0 
370  ?  "LATO  INPUT  LATO : DT=LRTQ/80  =  ? 

448  IF  X=30  THEN  TRAP  450  FI$ <LEN<FI^>  >=,,4"  XIO  33, #3, 0, Q, FIT 
470  ?  ."FRATTALI  DISPONIBILI ="= ?  OPEN  #2, 6, 0, "D  X. F4"  Z=0 
510  GOSUB  780  FI*<:LEN,:FI$>>  =  "4" 

530  I  NF'UT  #4 ;  X ,  Y ,  DT ,  ANGR ,  ANG I 

580  I F  X=80  THEN  TRAP  590  F I  $  <  LEN  <  F 1 $  >  > = "  4  "  X 1 0  33 ,  #3 , 0 , 0 ,  F I  $ 
780  FI$="D :  "  :FI$<3>=FR$:FI^<LEN':FI$>  +  1>=".F3" 

860  IF  NOT  < CO= 1 50  OR  DI>2>  THEN  820 
930  OANGR+XTDT : D=ANG I +YTDT 

990  GOSUB  310  COLOR  CO/ 10 :  PLOT  X  ,  2*Y  ■  PLOT  X,2*Y+1 
1000  Y=Y+1  IF  Y =80  THEN  Y=0  =  X=X+1 
1 070  F I $  < LEN  <  F I % >  >  =  " 4 " 

1 090  ?  #4  ;  X  ;  " ,  " Y  ;  " ,  "  ,  DT  ;  " ,  "  ;  ANGR ,  " ,  "  ;  ANG  I 
1160  FOR  YY =0  TO  80  STEP  10 
1170  PLOT  XX , YY : PLOT  XX, 159-YY 
1180  PLOT  79-XX, YY : PLOT  79-XX, 159-YY 


I  LINE#  CODE 


45  2381 
440  3151 
530  8799 
860  8345 
1000  4904 
1160  2347 


LINE#  CODE 


280  8941 
470  8994 
580  3279 
980  5252 
1070  2981 
1170  1739 


LINE#  CODE  I 


370  1030  ! 
510  6775  ! 
780  5337  I 

990  6759  I 
1090  1957  I 
1180  3721  ! 

! 


LISTING  4 

10  GRAPHICS  0?  "sto  controllando  le  linee  DATA. . . " • CK=Ù 
20  FOR  T=1  TO  139  READ  A : CK-CK+A : NEXT  T 
30  IF  CK 013323  THEN  ?  CHR$  <  253  >  •  "  ERRORE  NEI  DATA""  =  END 
40  RESTORE  : OPEN  #1,8,0, "D AUTORUN . SYS " 

50  ?  "DATA  Ok . " : ?  "Sto  creando  il  file  AUTORUN. SYS" 

60  FOR  T=1  TO  139 
70  READ  A-PUT  #1,A 
80  NEXT  T 

90  CLOSE  #1=?  "AUTORUN. SYS  creato!" 

1  fi  fi  end 

1 10  DATA  255,255, 160,6, 162,6,76, 175,6, 175,6,251,6, 160,11, 185 
1 20  DAT A  0 , 228 , 1 53 , 1 63 ,6,1 36 ,16, 247 ,169, 222 ,141,167,6,169,6,141 
1 30  DATA  1 68 ,6,1 72 , 1 70 ,6,1 74 , 1 69 , 6 , 232 , 208 , 1 , 200 , 1 42 , 246 ,6,1 40 
140  DATA  247,6, 169, 163, 141,33,3, 169,6, 141,34,3,96, 172,0,6 
1 50  DAT  A  208 , 10,1 69 ,0,141 , 33 ,  3 , 1 69 , 228 ,141,34,3 ,  1:85 ,  1 , 6 , 206 
160  DATA  0,6,72,32,251,6, 104, 160,1,96,253,6,255,6, 108,250 
1 70  DATA  191, 68 , 2 , 68 , 2 , 0 , 9 , 0 , 9 , 0 , 1 , 226 , 2 , 227 ,2,1 60 
1 80  DAT A  6 , 224 , 2 , 225 , 2 , 253 , 6 , 0 , 6 , 1 5 , 6,14,1 55  - , 76 , 65 
1 90  DATA  84 , 84 , 65 , 82 , 70 , 58 , 68 , 34 , 78 , 85 , 82 


I  LINE#  CODE 


LINE#  CODE  !  LINE#  CODE  ! 


10  1331 
40  0720 
70  9874 
100  1706 
130  6243 
160  1724 
190  3880 


20  0118  ! 
50  3242  I 
80  3033  I 
110  0888  ! 
140  1811  ! 
170  2406  I 
\ 


30  5196  I 
60  8703  I 
90  6892  ! 
120  0380  ! 
150  7298  ! 
180  1040  I 
! 


si  aspetta  che  voi  premiate  START  pri¬ 
ma  di  tornare  al  menu.  Fate  attenzione 
che  un  salvataggio  su  disco  termina 
quando  il  drive  ha  finito  di  girare.  Il  suo¬ 
no  normale  del  drive  è  stato  disinserito. 
Quando  un  frattale  viene  completato, 
viene  salvato  automaticamente,  e  viene 
cancellato  l’eventuale  file  dei  dati  se  era 
stato  interrotto. 

I  disegni  migliori  sono  quelli  che  ingran¬ 
discono  particolari  del  margine:  provate 
ad  esempio  con  questi  valori:  —0.75, 
0.25,  0.1  oppure  —1,  —2.5,  0.1  e  0.02, 
—0.79,  0.05.  Non  preoccupartevi  se  le 
prime  volte  che  introdurrete  valori  a  caso 
non  vedrete  niente:  non  è  facile  trovare 
subito  zone  “belle”. 

E  ora  qualche  consiglio  per  gli  smanetto- 
ni  esigenti. 

Probabilmente  75  iterazioni  lasciano  fuo¬ 
ri  una  zona  di  margine  interessante.  Per 
migliorare  la  precisione  (a  scapito  della 
velocità)  si  possono  modificare  le  linee 
del  listato  2.  Se  poi  non  vi  piace  il  fatto  di 
avere  una  zona  quadrata  rappresentata 
con  pixel  orizzontali,  modificate  le  linee 
del  listato  3  in  modo  da  avere  una  risolu¬ 
zione  di  80X80  dove  vengono  accesi  due 
pixel  alla  volta,  così,  da  avere  i  punti  un 
po’  più  quadrati.  Questa  versione  è  già 
predisposta  a  doppia  precisione,  e  cam¬ 
bia  le  estensioni  dei  files  (F3  =  disegno, 
F4  =  dati),  così  da  non  creare  conflitti 
tra  i  disegni  creati  dalle  due  versioni. 
Per  chi  ama  le  sfide  difficili  consiglio  di 
provare  e  adattare  il  programma  alla  gra¬ 
fica  15. 

Vista  l’inevitabile  lentezza  del  program¬ 
ma  (se  trovate  un  frattale  da  meno  di  3 
ore  fatecelo  sapere!),  consigliamo  a  chi 
lo  possiede  di  compilare  il  programma. 
Stavamo  per  dimenticarci  del  listato  4. 
Questo  serve  a  creare  su  un  disco  un  file 
AUTORUN. SYS  che  carica  e  esegue  un 
file  in  basic  chiamato  FRATTALI. 
Quindi  se  salvate  il  programma  con  il  no¬ 
me  FRATTALI  e  se  il  disco  contiene 
questo  Autorun  (e  il  DOS),  il  program¬ 
ma  viene  caricato  all’atto  dell’accensione 
(senza  premere  OPTION). 


ELENCO  VARIABILI 

FR$  =  Nome  del  frattale. 

FI$  =  Nome  del  file 
CIO$  =  Routine  CIO 
GR  =  Modo  grafico  . 

ANGR,ANGI  =  Numero  complesso,  angolo 
del  campo. 

LATO  =  Lato  del  campo  complesso. 

DR,DT  =  Fattori  di  scala  assi  x,y 
X,Y  =  Coordinate  punti  sullo  schermo 
C,D  =  Numero  complesso  corrispondente  a 
X,Y, 

AP,BP  =  Numero  complesso  Z. 

DI  =  Dimensione  di  Z. 

CO  =  Contatore  di  iterazioni. 

IOCB  =  Canale  utilizzato  dal  CID 
TYPE  =  Operazione  CIO 
(7 = RE  A  D .  11  =  WRITE) . 

BLOCK  =  Indirizzo  di  inizio  del  canale  CIO. 
LN  =  Numero  di  bytes  di  una  immagine 
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SEZIONE  ST 


m  DBMan 


PROVA 

SOFTWARE 


DI  MATTEO  PRINETTI 


UN 

LINGUAGGIO 

DI 

PROGRAMMA¬ 
ZIONE  PER  LA 
GESTIONE 
DEI  DATI 


Per  l’Atari  ST  ci  sono  in  giro  molti 
Database.  Dal  DB  Master  al 
CARD  File  ecc...  La  maggior  par¬ 
te  di  questi  permettono  di  definire  un 
archivio  e  di  effettuare  semplici  opera¬ 
zioni  su  di  esso  (ordinamenti,  ricerche, 
generazioni  di  tabulati  ecc.)  ma  risento¬ 
no  tutti  delle  limitazioni  imposte  princi¬ 
palmente  dal  fatto  che  sono  programmi 
finiti  e  non  linguaggi  di  programmazio¬ 
ne.  Ci  sono  poi  programmi  che  si  distac¬ 
cano  dalla  categoria  per  diventare  veri  e 
propri  linguaggi  di  programmazione.  E  il 
caso  di  Holmes  &  Duckworth  ma  soprat¬ 
tutto  di  DBMan,  in  pratica  la  versione 
per  Atari  St  del  programma  DB  III  pro¬ 
dotto  per  MS  DOS  dalla  Ashon  Tate. 
Dire  in  poche  righe  cosa  rappresenti  il 
DB  III  per  la  programmazione  gestiona¬ 
le  è  impossibile.  Si  tratta  di  uno  di  quegli 
standard  che  sono  oramai  talmente  attec¬ 
chiti  nelle  usanze  dei  programmatori  che 
senza  di  esso  non  possono  più  sopravvi¬ 


vere.  In  effetti  il  suo  grande  pregio  (e  che 
si  trasferisce  di  pari  passo  nel  DBMan)  è 
che  può  essere  usato  sia  dal  programmà- 
tore  che  dall’utente  finale  con  estrema 
semplicità,  e  che  ha  una  gestione  dell’I/O 
(sia  dai  files  che  da  tastiera)  veramente 
ottima. 

Di  contro  è  un  prodotto  “dedicato”.  Non 
ci  sono  la  maggior  parte  delle  funzioni 
matematiche  estese  come  la  notazione 
esponenziale,  le  funzioni  trigonometri¬ 
che,  completamente  assenti  funzioni  gra¬ 
fiche  evolute.  Insomma  DBMan  è  ottimo 
dovunque  sia  presente  una  problematica 
di  tipo  aziendale,  vedi  contabilità,  gestio¬ 
ne  ordini/magazzino,  ecc.  e  non  in  ambi¬ 
to  tecnico-scientifico  con  il  quale  va  poco 
d’accordo. 

Vediamo  di  entrare  però  nel  dettaglio. 
Innanzitutto  la  confezione.  DBMan  ri¬ 
siede  su  tre  dischi  tutti  non  protetti  e  ne¬ 
cessita  di  400K  di  Ram  libera  (chi  avesse 
uno  dei  primi  520  ST  senza  le  ROM  del 
TOS  è  pregato  di  comprarle),  ma  il  disco 
fisso  è  molto  consigliato,  dato  che  senza 
di  esso  i  programmi  girano  molto  lenta¬ 
mente  a  causa  dei  continui  accessi  al  di¬ 
sco.  Un  bel  manuale  di  200  pagine  chia¬ 
ramente  in  inglese  completa  il  tutto,  for¬ 
tunatamente  si  può  ricorrere  a  uno  dei 
tanti  manuali  tecnici  per  il  DB  III  per  MS 
DOS  editi  in  italiano  dal  quale  non  risul¬ 
ta  difficile  estrapolare  la  spiegazione  del¬ 
la  maggior  parte  dei  comandi. 

Una  volta  caricato,  il  dischetto  si  può  to¬ 
gliere  per  inserire  il  nostro  disco.  Si  rile¬ 
va  che  non  sempre  il  programma  funzio¬ 
na  al  primo  colpo,  nel  senso  che  bisogna 
resettare  la  macchina  e  ricaricare.  Que¬ 
sto  inconveniente  è  stato  riscontrato  so¬ 
prattutto  sui  vecchi  520  ST.  Dopodiché  si 
può  cominciare  a  lavorare. 

CARATTERISTICHE  TECNICHE 

Ogni  file  può  avere  fino  a  128  campi  per 
un  totale  di  4000  caratteri  per  record. 
Contemporaneamente  si  possono  tenere 


La  schermata  iniziale 
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aperti  10  files.  Ci  sono  quattro  tipi  di  dati 
e  cioè  stringhe  di  caratteri  (fino  a  254 
caratteri  per  stringa),  date,  variabili  logi¬ 
che  (“vero”  e  “falso”)  e  numeri,  con  15 
cifre  significative. 

Con  questi  “spazi  di  manovra”  si  riesco¬ 
no  a  coprire  la  maggior  parte  delle  appli¬ 
cazioni.  Come  accennato  DBMan  può 
essere  usato  in  due  modi.  Da  utente  o  da 
programmatore.  In  pratica  si  può  scrive¬ 
re  un  programma  in  DBMan  che  non  è 
altro  che  la  sequenza  dei  comandi  dati  da 
tastiera  integrati  con  comandi  per  la  ge¬ 
stione  del  flusso  del  programma 
(IF,DO..WHILE,  ecc...). 

Se  si  usa  DBMan  in  modo  utente  non  si 


Infatti  è  sempre  difficile  controllare  che 
un  Input  numerico  sia  tale,  compreso  in 
un  range,  o  che  uno  alfanumerico  sia  tut¬ 
to  maiuscolo  o  allineato  a  sinistra,  o  che 
una  data  sia  “data”.  Il  DBMan  permette 
una  completa  gestione  dell’Input  che 
soddisfa  tutte  le  esigenze,  ed  è  un  vero 
sollievo  non  dover  mettersi  a  pensare 
sempre  se  il  dato  sarà  esatto,  controllare 
che  sia  numerico,  che  non  vengano  usati 
tasti  di  direzione  (freccette  ecc...).  Solo 
questa  parte  giustifica  il  prodotto. 

Se  nel  vostro  programma  usate  i  file,  an¬ 
date  incontro  ai  soliti  macelli.  Definire  il 
record,  la  struttura,  su  cosa  fare  l’indice, 
creare  il  file  indice,  tenere  aggiornati  en- 


fare  con  relativamente  poca  fatica. 

Oltre  ai  due  dischi  ne  viene  fornito  un 
terzo  con  su  scritto  “Compilatore”  a  ma¬ 
no,  senza  manuale,  che  non  so  se  è  pre¬ 
sente  anche  nella  confezione  in  commer¬ 
cio.  Comunque  non  compila  un  tubo,  si 
limita  a  comprimere  i  programmi  che  co¬ 
sì  girano  un  po’  più  in  fretta  e  non  sono 
visibili  con  l’editor,  dimodoché  risultano 
“protetti”. 

CONCLUSIONI 

DBman  è  sicuramente  un  programma 
utile,  ma  dato  che  viene  venduto  dalla 
Atari  sarebbe  auspicabile  un  manuale  in 
italiano.  Inoltre  il  programma  gira  più 


hanno  molti  problemi.  I  guai  iniziano  se 
si  scrive  un  programma  e  si  prova  ad  ese¬ 
guirlo.  Infatti  in  DBMan  non  c’è  un  vero 
e  proprio  editor,  per  cui  bisogna  uscire 
da  DBMan,  caricare  l’editor,  modificare 
il  programma,  ricaricare  DBMan  e  ripro¬ 
vare  ad  eseguirlo.  Ci  sono  dei  tasti  di 
debugging  ma  non  li  ritengo  molto  utili, 
personalmente  preferisco  avere  l’editor 
“in  linea”  e  rinunciare  ai  tasti  di  debug. 
Comunque  i  presupposti  per  scrivere 
buoni  programmi  ci  sono  tutti,  soprattut¬ 
to  sono  presenti  tutte  le  facilitazioni  pre¬ 
viste  dal  DB  III  per  la  gestione  degli  indi¬ 
ci  e  dell’input  dallo  schermo.  Se  pensate 
attentamente  alla  struttura  di  un  pro¬ 
gramma  vi  accorgete  che  i  controlli  sul¬ 
l’input  rappresentano  il  50%  del  lavoro. 


trambi  in  contemporanea.  Con  DBman 
vi  dimenticate  tutto  questo  perché  il  pro¬ 
gramma  fa  tutto  in  automatico.  Si  posso¬ 
no  definire  file,  indici  multipli,  cambiare 
la  struttura  di  un  record  senza  perdere  i 
dati  in  esso  contenuti,  insomma  questa 
altra  parte  di  DBman  giustifica  comple¬ 
tamente  il  prodotto. 

C’è  una  utility  presente  per  creare  dei 
tabulati,  invero  molto  semplice  ma  co¬ 
munque  utile  per  piccole  applicazioni; 
per  prospetti  complessi  è  necessario  scri¬ 
vere  un  programma  che  genera  il  tabula¬ 
to.  Manca  l’utility  presente  nel  DB  III 
per  la  stampa  delle  etichette.  Infine  per 
chi  desideri  vedere  qualcosa  in  DBMan, 
c’è  un  piccolo  programma  di  Mailing  List 
che  però  rende  bene  l’idea  di  cosa  si  può 


lentamente  che  il  DB  III  e  la  compatibili¬ 
tà  è  a  volte  complessa  da  gestire.  Si  apre 
comunque  una  grande  strada  per  i  pro¬ 
grammatori,  e  cioè  di  trasferire  la  marea 
di  Software  scritto  in  DB  III  sotto  ST. 
Quanto  ciò  sia  possibile  è  da  verificare. 
Viene  infine  spontanea  una  domanda. 
Quanto  è  utile  DBMan  al  nostro  amico 
“smanettone”?  Poco  o  niente,  infatti  è 
ormai  da  tempo  consolidata  la  constata¬ 
zione  che  per  tenere  la  lista  degli  indirizzi 
è  meglio  una  rubrica  e  relativa  matita.  Se 
poi  c’è  qualcuno  (c’è?)  che  utilizza  l’ST 
in  ambito  aziendale,  DBMan  è  la  rispo¬ 
sta  a  tutti  i  suoi  problemi.  Il  rapporto 
prestazioni/prezzo  è  soddisfacente  (DB 
III  costa  10  volte  di  più!). 
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L'INFORMAZIONE  CORRE 
SUL  FILO 


DI  PAOLO  GALVANI 


LA  TRASMISSIONE  DEI  DATI  VIA 
TELEFONO  STA  VIVENDO  UN  MO¬ 
MENTO  DI  ECCEZIONALE  VIGO¬ 
RE.  GLI  UTENTI  DI  ATARI  ST  NON 
POSSONO  STARE  ALLA  FINESTRA: 
ECCO  A  VOI  QUATTRO  PRO¬ 
GRAMMI  DI  COMUNICAZIONE 
PER  IL  VOSTRO  COMPUTER. 


Fino  a  non  molto  tempo  fa,  acqui¬ 
stare  un  modem  significava  investi¬ 
re  ingenti  capitali  e  rischiare  di  tro¬ 
varsi  con  un  oggetto  poco  funzionale. 
Ora  si  trovano  in  commercio  apparecchi 
affidabili  e  di  costo  contenuto  già  a  parti¬ 
re  dalle  150.000  lire.  Così  la  comunica¬ 
zione  tramite  linee  telefoniche  si  espande 
senza  sosta,  e  non  passa  giorno  senza  che 
nasca  qualche  nuova  banca  dati. 

L’errore  che  comunemente  si  tende  a  fa¬ 
re  è  quello  di  scegliere  con  molta  atten¬ 
zione  il  modem  (nome  derivante  dalle 
parole  “modulatore-demodulatore”)  e 
lasciare  al  caso,  o  quasi,  la  scelta  del  so¬ 
ftware.  Eppure,  al  pari  dei  modem,  i 
programmi  di  comunicazione  possono 
variare  notevolmente  da  uno  all’altro, 
tanto  che,  senza  far  attenzione,  potrem¬ 
mo  acquistare  software  completamente 
inadatto  al  nostro  lavoro. 

Abbiamo  messo  faccia  a  faccia  quattro 
programmi  di  comunicazione  di  vario  ti¬ 
po,  dai  semplici  pacchetti  di  comunica¬ 
zione  agli  emulatori  di  terminale,  per  ve¬ 
rificare  quali  sono  le  principali  caratteri¬ 
stiche  per  ognuno  di  essi. 

Ecco  allora  K-Komm  2,  Flash,  PC/Inter- 
Comm  e  FaSTcom  affiancati  per  la  no¬ 
stra  prova. 

Prima  di  passare  al  confronto  diretto  vor¬ 
remmo  però  soffermarci  sui  parametri  di 
trasmissione  dati  oggi  utilizzabili. 

I  PARAMETRI  DI  TRASMISSIONE 

Il  computer  con  il  quale  intendiamo  col¬ 
legarci  viene  definito  “host”,  ospite,  e 
per  poter  dialogare  con  lui  dovremo  ade¬ 
guare  la  nostra  macchina  al  suo  standard. 
In  primo  luogo  va  definita  la  velocità  di 
trasferimento  dati,  misurata  in  baud. 
Questa  è  generalmente  variabile  tra  i  50 
e  i  9600  baud;  le  normali  linee  telefoni¬ 
che  non  riescono  a  inviare  un  segnale 
perfetto  ad  altissima  velocità  perché  la 
trasmissione  analogica  porta  ad  avere  dei 
disturbi  di  linea.  Quindi  è  chiaro  che  per 
non  perdere  parti  del  segnale  la  trasmis¬ 
sione  va  effettuata  ad  una  velocità  piut¬ 
tosto  lenta,  di  solito  300  o  1200  baud. 

I  dati,  per  essere  trasmessi,  vengono  in¬ 
viati  divisi  a  “gruppetti”  che  possono  es- 
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sere  formati  da  sette  oppure  otto  bit.  È 
perciò  necessario  selezionarne  la  giusta 
quantità  a  seconda  di  quanto  usato  dal 
computer  remoto. 

A  questi  bit,  in  alcuni  casi,  va  aggiunto  il 
bit  di  parità:  se  il  gruppetto  di  sette  (o 
otto)  bit  contiene  in  maggiore  numero 
degli  “0”,  allora  dovremo  scegliere  “pa¬ 
ri”,  se  al  contrario  sono  gli  “1”  a  prevale¬ 
re  selezioneremo  “dispari”. 

Un  ulteriore  controllo  va  aggiunto  per 
segnalare  all’host  computer  che  il  grup¬ 
petto  è  stato  interamente  trasmesso.  Per 
farlo  inseriremo,  a  seconda  dei  casi,  uno 
o  due  bit  denominati  “di  stop”. 

Altra  selezione  da  effettuare  è  quella  tra 
Half  e  Full  Duplex.  Quando  trasmettia¬ 
mo,  abbiamo  la  possibilità  di  vedere  sul 
nostro  monitor  i  dati  nel  momento  in  cui 
li  inviamo  (Half  Duplex)  oppure  di  rice¬ 
verli  (e  vederli)  di  ritorno  dall’host,  in 
modo  da  controllare  l’assenza  di  errori 
(Full  Duplex). 

Queste  selezioni  vanno  fatte  se  possedia¬ 
mo  un  pacchetto  di  comunicazione. 
Spesso  il  software  ci  mette  però  a  dispo¬ 
sizione  dei  protocolli  di  trasmissione,  ov¬ 
vero  una  serie  di  parametri  fissi  e  stan¬ 
dard  con  i  quali  settare  la  nostra  RS232. 
L’emulazione  di  un  terminale  ci  consente 
invece  di  trasformare  il  nostro  computer 
in  una  macchina  dedita  esclusivamente 
alla  trasmissione/ricezione  dei  dati. 

AM  COMPUTER  TECHNOLOGY 
FASTCOM 

Il  primo  programma  preso  in  considera¬ 
zione  è  FaSTcom.  Studiato  appositamen¬ 
te  per  i  neofiti  è  essenziale  nelle  presta¬ 
zioni  e  intuitivo  nell’uso. 

La  schermata  di  presentazione  ispira  im¬ 
mediatamente  un  senso  di  confidenza: 
incolonnate  ordinatamente  sul  lato  sini¬ 
stro  vi  sono,  tranquillizzanti,  diverse  ico¬ 
ne,  mentre  nella  barra  orizzontale  supe¬ 
riore  trovano  posto  i  ben  conosciuti  me¬ 
nu  pull-down. 

L’interfaccia  utente  è  quella  consueta, 
cosicché  1’utilizzatore  si  trova  a  suo  com¬ 
pleto  agio  usando  il  familiare  mouse. 
ICONA  TELEFONO  -  Raffigura  un’ap¬ 
parecchio  telefonico  e  selezionandola 


Cannano s 


c  !lS[co„ 


Nìracic  IÌSJ08Q 


Grazio  alla  saria  di 
icona  pasta  sul  lato 
sinistro  a  all'uso  dal 
mouso,  FaSTcom 
risulta  escara  il  più 
intuitivo  tra  i 


provati. 


con  il  mouse  appare  una  finestra  conte¬ 
nente  una  rubrica  telefonica.  Qui  com¬ 
paiono  tutti  i  nominativi  con  i  relativi  nu¬ 
meri  di  telefono  che  in  precedenza  abbia¬ 
mo  memorizzato.  Anche  se  non  sono  vi¬ 
sibili,  ad  ogni  nome  sono  associati  i  rela¬ 
tivi  parametri. 

Nella  stessa  finestra  vi  sono  tre  tasti: 
“Diai”  -  per  chiamare  -,  “Redial”  -  per 
richiamare  -  e  “Locai”  -  per  collegarsi  ad 
un  host  direttamente  senza  connessione 
telefonica. 

ICONA  TELEPHONE  HOOK  -  Si  trova 
appena  sotto  all’altra  e  viene  utilizzata 
per  inserire  i  nuovi  nominativi.  Qui  dob¬ 
biamo  settare  i  parametri  che  verranno 
poi  memorizzati  nella  prima  icona. 
FaSTcom  possiede  solo  il  protocollo 
TTY,  che  è  anche  il  più  diffuso  e  il  più 
semplice.  La  velocità  di  trasmissione  è 
variabile  sia  per  l’invio  dei  dati,  sia  per  la 
ricezione.  Le  frequenze  impostabili  sono 
75,  110,  150,  300,  600,  1200,  2400,  4800  e 
9600  Baud. 

ICONA  MODEM  -  Contiene  l’elenco  dei 
più  diffusi  modem  con  i  relativi  parame¬ 
tri.  Se  il  modem  in  vostro  possesso  non 
compare,  ma  questo  è  molto  difficile,  po¬ 
trete  definirlo  voi  stessi. 

Prima  di  effettuare  una  chiamata  dovrete 
quindi  selezionare  il  modello  del  vostro 
apparecchio  da  questo  elenco. 

ICONA  TESTO  -  Come  molti  altri  pro¬ 
grammi  di  comunicazione,  anche  Fa¬ 
STcom  offre  la  possibilità  di  realizzare 
testi  con  stili  differenti  da  quello  norma¬ 


le.  Con  questa  opzione  potete  scegliere 
tra  i  caratteri  piani,  in  grassetto,  italici, 
sottolineati,  contornati  e  ombreggiati. 
Oltre  a  questo,  se  avete  anche  un  moni¬ 
tor  a  colori,  vi  viene  offerta  la  possibilità 
di  variare  il  colore  dello  schermo.  Le  to¬ 
nalità  disponibili  sono  il  rosso,  il  blu,  il 
verde,  il  magenta,  il  ciano  e  il  giallo. 
ICONA  STATISTICHE  -  Memorizza  au¬ 
tomaticamente  tutte  le  chiamate  indican¬ 
do  il  nominativo,  con  relativo  numero 
telefonico,  con  il  quale  siamo  stati  colle¬ 
gati,  la  data  e  l’ora  del  collegamento  e  la 
sua  durata. 

ICONE  DOCUMENTO  -  Servono  a  defi¬ 
nire  il  tipo  di  file  da  trasmettere/ricevere. 
Questi  possono  essere  testi,  immagini 
(che  possono  essere  ricevute  ma  non 
create  con  FaSTcom),  messaggi  e  se¬ 
quenze  logiche. 

ICONA  HELP  -  In  ogni  momento  possia¬ 
mo  caricare  un  file  di  aiuto  relativo  alle 
operazioni  che  svolgiamo.  Per  farlo  è 
sufficiente  selezionare  questa  icona  e  in¬ 
dicare  quale  file  intendiamo  visionare. 

I  MENU  PULL-DOWN 

Come  detto,  oltre  alle  icone  abbiamo  an¬ 
che  i  classici  menu  a  discesa.  In  alcuni 
casi  essi  riportano  le  funzioni  delle  icone, 
in  altri  offrono  altre  opzioni. 

MENU  FILE  -  Ovviamente  contiene  tutti 
i  comandi  per  il  trattamento  dei  file.  Tro¬ 
viamo  quindi  “New”,  “Open”,  “Close”, 
“Close  all”,  “Save”  e  “Save  as”.  Oltre  a 
questi  vi  sono  anche  i  comandi  per  trasfe- 
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rire  i  dati,  ovvero  “Send  file"  (per  inviar¬ 
li),  “Receive  file”  (per  riceverli)  e  “Send 
Message”  (per  inviare  un  messaggio). 
MENU  EDIT  -  È  il  menu  che  permette  il 
trattamento  dei  testi.  Abbiamo  quindi  le 
solite  funzioni  di  taglia,  copia  e  incolla 
nonché  “Undo”,  “Show  clipboard”  e 
“Find  and  replace”.  In  più  troviamo  “Se- 
lect  all”,  “Set  Text  Width”  (per  stabilire 
la  larghezza  del  testo)  e  “Save  with  CR” 
(per  salvare  i  dati  con  i  Carriage  Return, 
ovvero  gli  “a  capo”). 

MENU  COMMANDS  -  In  questo  caso  il 
menu  riporta  le  stesse  funzioni  delle 
icone. 


no  le  icone  e  rimangono  semplicemente  i 
menu  a  discesa. 

L’utilizzo  comunque  non  è  proibitivo,  e 
con  un  minimo  di  applicazione  il  tempo 
di  apprendimento  è  molto  breve.  Lo 
svantaggio  rispetto  a  FaSTcom  è  che 
Flash  è  molto  meno  istintivo. 

MENU  FILE 

In  questo  caso  i  comandi  non  sono  molti, 
solamente  quelli  essenziali  per  il  tratta¬ 
mento  dei  dati.  Ci  sono  “Load”,  “Save”, 
“Delete”  e  “Merge”,  che  serve  a  caricare 
una  serie  di  nominativi  tratti,  per  esem¬ 
pio,  da  un  database. 


possibile  apportarvi  modifiche. 

RS232  CONFIGURATION  -  Da  questo 
punto  di  vista  Flash  è  meno  versatile  di 
FaSTcom,  non  potendo  selezionare  velo¬ 
cità  basse  come  75,  110  o  150  Baud.  Le 
possibilità  offerte  sono:  300,  600,  1200, 
4800  e  9600  Baud. 

Naturalmente  presenti  la  dimensione  dei 
gruppi  di  bit  (7  o  8),  la  parità  e  i  bit  di 
stop  (1  o  2). 

ASCII  UL-DL  -  Contiene  le  opzioni  per  il 
trasferimento  dati.  Tra  le  altre  cose  per¬ 
mette  di  avere  una  pausa  al  termine  di 
ogni  linea  o  di  stabilire  il  carattere  di 
prompt. 
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MENU  THINGS  -  In  questo  menu  trovia¬ 
mo  alcune  interessanti  opzioni.  Ad 
esempio  la  “Tidy  Windows”,  per  pulire  le 
finestre,  o  l’“Auto  grab”,  ovvero  la  fun¬ 
zione  che  registra  automaticamente  i  file 
ricevuti.  Sempre  nello  stesso  menu  ab¬ 
biamo  il  comando  di  definizione  delle 
Macro  e  dei  tasti  funzione. 

Le  altre  funzioni  sono  “Hangup”,  per 
terminare  la  comunicazione,  “Clear  ree 
text”,  per  cancellare  il  testo  registrato, 
“Function  key  setup”,  per  assegnare 
stringhe  di  caratteri  ai  tasti  funzione,  e 
“Send  selected  text”,  per  inviare  la  parte 
di  testo  selezionata. 

IMPRESSIONI  D'USO 

FaSTcom  è  un  programma  di  semplicissi¬ 
mo  utilizzo  con  interessanti  funzioni 
adattissimo  per  chi  si  avvicina  alla  tra¬ 
smissione  dati  per  la  prima  volta.  Qual¬ 
siasi  difficoltà  può  comunque  venire  su¬ 
perata  con  la  funzione  Help,  che  dà,  in 
ogni  momento,  utili  indicazioni  su  tutte 
le  funzioni.  Grazie  a  queste  sue  preroga¬ 
tive,  FaSTcom  si  propone  sicuramente 
come  uno  tra  i  più  validi  programmi  di 
comunicazione  della  sua  categoria. 

ANTIC  FLASH 

Con  questo  pacchetto  entriamo  nei  pro¬ 
grammi  un  po’  più  complicati  nell’uso, 
ma  che  offrono  anche  una  maggiore  ver¬ 
satilità,  in  questo  caso  il  trattamento  di 
blocchi. 

Con  la  maggiore  sofisticazione  sparisco- 


MENU  EDIT 

Ritroviamo  tutte  le  funzioni  di  settaggio 
dei  parametri  di  trasmissione  dei  dati. 
Esaminiamo  con  ordine  le  possibilità  che 
ci  vengono  offerte  da  questo  menu. 
FUNCTION  KEYS  -  Permette  di  asse¬ 
gnare  una  stringa  di  caratteri  oppure  un 
comando  ad  ogni  tasto  funzione.  È  spes¬ 
so  utile  per  avere  sempre  a  disposizione 
la  propria  pass-word  o  i  codici  di  altri 
utenti  cosicché  non  saremo  costretti  a  di¬ 
gitarli  ogni  volta. 

DIAL  DIRECTORY  -  È  la  rubrica  conte¬ 
nente  i  numeri  dei  nominativi  memoriz¬ 
zati. 

XMODEM  PARAMETERS  -  Mentre  Fa¬ 
STcom  utilizza  il  protocollo  TTY,  Flash 
adotta  l’Xmodem.  Con  questa  opzione  è 


MENU  UPLOAD/DOWNLOAD 

Sono  i  menu  che  consentono  la  trasmis¬ 
sione  e  la  ricezione  dei  dati.  Upload  offre 
diverse  possibilità,  ovvero: 

File  Xmodem  -  Trasmette  un  file  in  pro¬ 
tocollo  Xmodem. 

File  ASCII  -  Trasmette  un  file  trasfor¬ 
mandolo  in  codice  ASCII. 

Capture  Xmodem  -  Trasmette  un  file  in 
protocollo  Xmodem  lasciando  invariati  i 
codici  di  controllo  del  testo. 

Capture  ASCII  -  Trasmette  un  file  in  co¬ 
dice  ASCII  con  i  codici  di  controllo. 
Block  Xmodem  -  Trasmette  un  blocco 
precedentemente  selezionato  in  proto¬ 
collo  Xmodem. 

Block  ASCII  -  Trasmette  un  blocco  tra¬ 
sformandolo  in  codice  ASCII. 
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Il  menu  Download  consente  di  ricevere 
file  in  protocollo  Xmodem  ed  in  codice 
ASCII. 

MENU  BLOCK 

Abbiamo  parlato  di  trasmissione  di  bloc¬ 
chi,  ma  non  abbiamo  ancora  detto  come 
crearli.  All’uopo  vi  è  il  menu  Block,  che 
serve  proprio  a  questo:  al  trattamento  e 
alla  creazione  dei  blocchi. 

MARK  STAR  -  Indica  il  punto  di  inizio 
del  blocco. 

MARK  END  -  Indica  la  fine  del  blocco. 
Un  blocco  è  costituito  dalla  parte  di  testo 
compresa  tra  il  Mark  start  e  il  Mark  end. 


ruvido  nell’uso,  ovvero  richiede  una 
maggiore  attenzione  almeno  le  prime 
volte.  La  mancanza  di  un  punto  di  riferi¬ 
mento  semplice  e  chiaro  come  le  icone 
ha  il  suo  peso.  Nonostante  ciò,  non  appe¬ 
na  si  è  presa  un  po’  di  confidenza  con  il 
programma  tutto  fila  liscio  e  il  lavoro 
procede  speditamente. 

A  parte  la  differenza  nel  protocollo  di 
trasmissione  adottato  dai  due  program¬ 
mi,  Flash  si  differenzia  per  la  comoda 
possibilità  di  manipolare  blocchi  di  testo. 

KUMA  K-COMM  2 

Con  questo  programma  della  Kuma 


pacchetto  per  la  comunicazione,  di  cui  in 
questo  articolo  non  ci  occupiamo.  La 
presenza  di  questo  programma  va  co¬ 
munque  tenuta  in  considerazione  al  mo¬ 
mento  dell’acquisto. 

MENU  FILE 

Per  gestire  i  file  troviamo  diverse  opzio¬ 
ni,  dalle  semplici  “Open”  e  “Close”  alle 
più  complesse  operazioni  di  trasferi¬ 
mento. 

RECEIVE,  PAUSE,  CLOSE  -  Sono  i  co¬ 
mandi  usati  per  ricevere  i  dati  dall’host 
computer.  “Pause”  consente  di  fermare 
momentaneamente  la  ricezione. 
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Temimi  Ment.  EEZDE1I2S 
Bauli  Rate:  SS  M  HI  IH  l»2Ì  EH  EH  SU  ISH 
Bits:  annuii  stop  bits;  OBCSa]  Rarity:  Soni]  IM)  003 
Handshake:  EHI Ì«fiSsS S™®  “idth:  0®® 
Ecbo:  rasali  CR  gives  LF:  DÈH3E3I  1  »RCEl  | 

Debug  Mode:  D£]  Ea  Send  IFs:  [TeTi  EH  [ 

Strip  Top:  [HEa  Mrap  at  EOI:  ESCE]  [ 


Help  I 


.  OR 


I  Ilo  Rodai  I  Direct  connection  to  host  conputer. 

1  Punii  Hodew  I  Manuali»  controlled  or  acoustic  coupler. 
1  PoiseTial  |  ttutodial  by  pulsing  OTR  line. 

|  Hayes  Snartnoden  Conpatible. 

2  Oacon  OSL  2123ft0  or  6T. 

"Tendati  1  Tandata  T«512  or  other  U25  bis  Hoden. 


bacon 


Quit 

Edit 

*  Qk 

CLEAR  MARKS  -  Elimina  i  limiti  del 
blocco. 

FIND  START  -  A  volte  risulta  difficolto¬ 
so  risalire  all’inizio  di  un  blocco.  Con 
questa  opzione  Flash  lo  trova  immediata¬ 
mente. 

DELETE  BLOCK  -  Cancella  un  blocco. 
SAVE,  PRINT,  APPEND  BLOCK  -  Sono 
i  tre  comandi  che  permettono  di  salvare, 
stampare  e  aggiungere  blocchi. 

MENU  OPTIONS 

Nel  menu  delle  opzioni  troviamo  alcune 
funzioni  che  risultano  utili  a  velocizzare 
il  lavoro  e,  come  nel  caso  di  “Status”,  ci 
riepilogano  il  nostro  stato. 

HELP  e  EDITING  HELP  -  Editing  Help 
accede  ad  una  finestra  che  ricorda  qual  è 
la  funzione  di  alcuni  dei  principali  tasti, 
Help  permette  invece  di  ottenere  un  aiu¬ 
to  relativo  ai  principali  comandi. 

SET  CLOCK  -  L’ Atari  non  possiede  l’o¬ 
rologio  autoalimentato  come  nel  caso  del 
Macintosh,  per  cui  ogni  volta  va  rego¬ 
lato. 

STATUS  -  Dà  utili  informazioni  sullo  sta¬ 
to  della  porta  RS232,  sul  protocollo  di 
trasmissione  e  sul  modem. 

FIND  STRING  -  Trova  una  stringa  di  ca¬ 
ratteri  all’interno  del  testo. 

PRINT  CAPTURE  E  CLEAR  CAPTU- 
RE  -  Rispettivamente  stampa  e  cancella  i 
Capture  File. 

IMPRESSIONI  D'USO 

Rispetto  a  FaSTcom,  Flash  è  un  po’  più 


Computers,  distribuito  nel  nostro  paese 
dalla  Atari  Italia,  ci  spostiamo  su  pro¬ 
grammi  di  ben  altra  categoria:  gli  emula¬ 
tori. 

K-Comm  2  è  in  grado  di  emulare  senza 
difficoltà  un  semplice  terminale  Tele- 
type,  ma  anche  i  più  complessi,  e  molto 
più  diffusi,  VT52  e  VT100.  Grazie  all’op¬ 
zione  “Configure  terminal”  è  anche  pos¬ 
sibile  emulare  altri  terminali. 
Ovviamente  l’uso  della  tastiera,  ed  in 
particolare  del  tastierino  numerico,  sarà 
leggermente  differente  dal  solito,  ragion 
per  cui  è  consigliabile  per  i  primi  tempi 
avere  sempre  sottomano  il  manuale. 
Anche  in  questo  programma  non  vi  sono 
icone,  ma  solamente  menu  a  discesa. 
Insieme  a  K-Comm  2,  emulatore  di  ter¬ 
minali,  viene  fornito  anche  K-Vievw, 


SEND  -  Spedisce  i  dati  all’elaboratore 
collegato. 

TAKE  SNAPSHOT  -  Selezionando  que¬ 
sta  opzione,  K-Comm  2  “fotografa”  lo 
schermo  e  ne  memorizza  l’immagine  in 
uno  speciale  buffer.  Per  visionare  quanto 
memorizzato  basterà  usare  l’opzione 
“View  snapshot”.  Se  selezioniamo  due 
volte  “Take  snapshot”,  la  prima  scher¬ 
mata  verrà  cancellata  dal  buffer. 
XMODEM  -  È  il  classico  protocollo  già 
adottato  anche  da  Flash. 

MENU  PRINTER 

È  il  menu  che  gestisce  il  funzionamento 
della  stampante  e  che  permette  così  di 
avere  copie  su  carta  delle  operazioni  ef¬ 
fettuate. 

CONTROL  CODES  -  Permette  di  varia- 
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SEZIONE  ST 


re  gli  stili  di  scrittura  con  i  relativi  codici 
che  verranno  poi  inviati  alla  periferica. 
SCREEN  DUMP  -  È  il  comando  che  con¬ 
sente  di  avere  una  copia  esatta  su  carta  di 
quanto  mostrato  sullo  schermo.  Pratica- 
mente  la  stessa  funzione  sempre  presente 
sugli  Atari  attivabile  con  la  pressione  di 
Alternate  +  Help. 

MENU  TERMINAL 

In  questo  menu  sono  presenti  tutti  i  co¬ 
mandi  di  definizione  della  RS232  e  del 
modem  oltre  a  qualche  altro  comando 
piuttosto  comodo. 

INDEX  OF  TERMINAL  -  Contiene  l’in¬ 
dice  di  tutti  i  terminali,  sia  quelli  già  pre¬ 
senti  nel  programma,  sia  quelli  preparati 
e  salvati  da  noi. 

LOAD/SAVE  TERMINAL  -  Dopo  avere 
configurato  un  particolare  terminale  è 
bene  salvarlo  per  evitare  di  ripetere  ogni 
volta  il  procedimento  di  preparazione. 
Ecco  quindi  la  presenza  di  “Load”  e  “Sa¬ 
ve”. 

CONFIGURE  TERMINAL  -  È  l’opzione 
che  permette  di  definire  il  terminale  da 
usare.  Selezionando  il  comando  appare 
una  finestra  di  dialogo  che  richiede  di¬ 
verse  cose.  Prima  di  tutto  va  indicato  il 
tipo  di  terminale  che  intendiamo  adotta¬ 
re,  se  questo  è  già  presente  tra  quelli  of¬ 
ferti,  oppure  va  specificato  che  vogliamo 
crearne  uno  diverso.  Successivamente 
possiamo  impostare  i  classici  parametri; 
la  velocità,  naturalmente  in  Baud,  può 
essere  stabilita  tra  75-1200,  110,  300, 
600,  1200-75,  1200,  2400,  4800,  9600. 
Oltre  agli  altri  normali  dati,  K-Comm  2 
può  variare  anche  il  numero  di  colonne 
del  testo,  che  può  essere  scelto  tra  80,  64 
e  40.  Una  cosa  da  notare  è  che  il  parame¬ 
tro  Duplex  qui  è  chiamato  Echo  Host 
(Full)  e  Echo  Locai  (Half). 

Alcuni  elaboratori  possono  inviare  all’i¬ 
nizio  e  al  termine  di  ogni  file  un  comando 
che  avvia  e  ferma  la  registrazione.  Vi  so¬ 
no  vari  modi  per  farlo.  K-Comm  2  ne 
propone  un  paio:  XON/XOFF  e 
CTS/RTS.  Se  l’elaboratore  a  cui  siete 
collegati  possiede  una  di  queste  due  pos¬ 
sibilità,  potrete  selezionarla  e  lavorare 
più  comodamente. 

Ultima  opzione  presente  nel  Configure 
Terminal  è  il  “Debug  Mode”,  che  con¬ 
sente  di  evidenziare  eventuali  errori  di 
trasmissione  e/o  ricezione. 

Tra  le  altre  numerose  possibilità  offerte 
dal  Menu  Terminal  troviamo,  oltre  agli 
scontati  “Function  keys”  e  “Modem 
Type”,  anche  il  comodissimo  “Keyboard 
Layout”,  che  permette  di  variare  a  piace¬ 
re  la  disposizione  dei  caratteri  sulla  ta¬ 
stiera.  Ad  esempio  potremo  far  sì  che 
digitando  la  lettera  “A”  sullo  schermo 
appaia  la  lettera  “B”  e  così  per  tutti  i 
tasti.  Questo  risulta  molto  comodo  in 
un’emulazione  di  terminale  perchè  il 
VT52  e  il  VT100  utilizzano  il  tastierino 
numerico  in  modo  diverso  dal  solito. 


MENU  0PTI0NS 

K-Comm  2  dispone  di  alcune  opzioni 
molto  utili,  tra  queste  la  più  interessante 
è  quella  che  permette  di  disporre  il  no¬ 
stro  Atari  in  modo  “Auto-answer”.  Con 
questa  funzione  inserita,  e  ovviamente 
con  la  macchina  accesa,  il  computer  ri¬ 
sponde  automaticamente  ad  una  even¬ 
tuale  chiamata  da  parte  dell’host.  “Auto- 
answer”  protegge  automaticamente  i  no¬ 
stri  file  che  non  saranno  inviati  senza  il 
nostro  permesso. 

Tra  le  altre  va  ricordata  “Purge  receive 
buffer”  che  serve  a  cancellare  quanto 
contenuto  nel  buffer. 

Interessante  la  possibilità  di  inviare  all’e¬ 
laboratore  collegato  un  break  al  termine 
dei  file.  Il  break  può  essere  corto 
(Short),  275  millisecondi,  o  lungo 
(Long),  1  secondo. 

Nello  stesso  menu  vi  è  il  comando  “Di- 
sconnetted”. 

MENU  HELP 

È  veramente  completo,  lo  dimostra  la 
lunga  fila  di  “aiuti”,  e  consente  l’accesso 
a  qualsiasi  informazione  ci  sia  necessaria. 
In  questo  modo  molte  difficoltà  possono 
essere  agilmente  superate. 

IMPRESSIONI  D'USO 

Sicuramente  è  più  difficile  da  usare  ri¬ 
spetto  a  FaSTcom  e  a  Flash,  ma  è  anche 
vero  che  offre  possibilità  agli  altri  scono¬ 
sciute. 

L’emulazione  di  terminali  aiuta  moltissi¬ 
mo  l’utente  che  si  collega  spesso  con 
grandi  sistemi.  Un  discreto  manuale  e  un 
ottimo  Help  aiutano  comunque  anche  i 
meno  esperti  nella  comunicazione. 

UNICORN  PC/INTERCOMM 

Con  questo  programma  saliamo  a  livelli 
decisamente  superiori,  sia  di  prestazioni 
che  di  prezzo.  Il  dischetto  viene  suppor¬ 
tato  da  un  ottimo  manuale  d’uso  di  ben 
135  pagine  che  guida  l’utilizzatore  passo 
dopo  passo  verso  il  mondo  della  telema¬ 
tica. 

PC/InterComm  è  piuttosto  complesso, 
ma  anche  il  principiante,  grazie  alla  do¬ 
cumentazione  allegata,  sarà  presto  in 
grado  di  destreggiarsi  tra  modem  e  pac¬ 
chetti  di  comunicazione. 

Il  mouse  in  questo  caso  sparisce  e  al  suo 
posto  si  usano  i  tasti  direzione. 

La  schermata  iniziale  presenta  il  video 
vuoto  eccezion  fatta  per  l’ultima  linea  in 
basso,  dove  troviamo  costantemente  le 
indicazioni  di  stato. 

Premendo  il  tasto  help  compare  il  menu 
principale,  composto  da  nove  varianti 
numerate.  Per  passare  ad  una  di  queste 
possiamo  spostarci  con  il  cursore  sull’op¬ 
zione  desiderata  oppure  semplicemente 
digitarne  il  corrispondente  numero. 

Il  programma  può  emulare  i  terminali 
VT52  e  VT100. 


C0MUNICATI0N  SPEED 
AND  PORI  SETUP 

È  il  menu  numero  uno,  nel  quale  abbia¬ 
mo  i  consueti  parametri  di  trasferimento. 
Tra  i  programmi  fino  a  qui  esaminati  è 
l’unico  in  grado  di  proporre  ben  dicias¬ 
sette  velocità  di  trasmissione  che  posso¬ 
no  essere  aumentate  fino  ad  un  numero 
indefinito  grazie  ad  una  opzione  di  cui 
parleremo  in  seguito.  Già  predisposte  so¬ 
no  comunque  50,  75,  110,  135,  150,  200, 
300,  600,  1200,  1800,  2000,  2400,  3600, 
4800,  7200,  9600  e  19200  Baud. 

Oltre  alle  selezioni  di  parità,  di  numero 
di  bit  e  di  bit  stop,  troviamo  qui  la  possi¬ 
bilità  di  mostrare  o  meno  gli  errori  di 
trasmissione  e  di  lasciare  o  no  le  linee 
DTR  e  RTS. 

INTERFACE  SETUP 

Qui  possiamo  selezionare  l’Half  o  il  Full 
Duplex,  l’XON/XOFF  sia  in  fase  di  spe¬ 
dizione  che  in  fase  di  ricevimento,  il  mo¬ 
do  ANSI  o  VT52. 

Inoltre  abbiamo  la  facoltà  di  far  sì  che  il 
tasto  backspace  possa  venire  inviato  co¬ 
me  segnale  di  cancellazione  (DEL)  o  co¬ 
me  normale  segnale  di  backspace  (BS). 
Una  cosa  simile  è  possibile  anche  con  il 
tasto  Enter,  che  può  essere  inviato  e  in¬ 
terpretato  come  semplice  segnale  di  con¬ 
ferma  o  anche  come  new-line. 

Sempre  da  questo  menu  possiamo  abbas¬ 
sare  l’effettiva  velocità  di  trasmissione. 
Se  ci  accorgiamo  che  l’host  ha  dei  proble¬ 
mi  a  ricevere  correttamente  i  nostri  file  è 
sufficiente  correggere  leggermente  la  ve¬ 
locità  impostata  in  modo  da  rendere  un 
poco  più  lento  il  flusso  dei  dati. 

STYLE  OPTIONS 

Al  contrario  di  quanto  dice  la  parola, 
questo  menu  non  consente  di  modificare 
lo  stile  dei  caratteri,  ma  semplicemente 
di  modificare  alcuni  parametri.  In  primo 
luogo  possiamo  far  sì  che  la  linea  di  stato 
venga  resa  invisibile  oppure  mostri  quat¬ 
tro  led,  che  visualizzano  la  qualità  della 
trasmissione,  al  posto  dell’orario.  Vi  è 
poi  la  funzione  “Wrap”,  che  evita  di  “ta¬ 
gliare”  le  parole  che  non  stanno  su  una 
linea  portandole  a  capo.  Con  l’opzione 
“Normal  o  slow  scroll”  possiamo  model¬ 
lare  secondo  le  nostre  esigenze  la  veloci¬ 
tà  di  scrolling  dello  schermo,  il  quale  può 
essere  anche  visualizzato  in  re  verse. 
Utile  il  suono  che  segnala  ravvicinarsi 
del  fine  linea  e  decisamente  importante  il 
comando  che  consente  di  trasformare  la 
tastiera  da  UK  a  US  a  grafica  e  vice¬ 
versa. 

FILE  PROTOCOL 

PC/InterComm  permette  di  utilizzare  di¬ 
versi  protocolli  di  trasmissione  che  lo 
rendono  molto  versatile  e  in  grado  di  col¬ 
legarsi  senza  problemi  a  quasi  tutti  i  cal¬ 
colatori.  A  scelta  si  possono  usare  Mo- 
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dem7,  Kermit,  Kermit  Image,  PC/Inter- 
Comm  (solo  tra  due  Atari  con  questo 
programma),  il  codice  ASCII  e  Raw,  ov¬ 
vero  il  codice  ASCII  completo  dei  carat¬ 
teri  di  controllo. 

A  volte  è  comodo  inviare  o  ricevere  pri¬ 
ma  o  dopo  ogni  file  una  stringa  di  carat¬ 
teri.  Con  InterComm  è  possibile  grazie 
all’apposita  funzione  che  chiede  quale  è 
la  stringa  da  utilizzare. 

Ultime  opzioni  di  questo  menu  sono  il 
comando  “Newline”  (che  può  essere  da¬ 
to  con  il  tasto  Space  o  con  il  tasto  Enter) 
e  le  varie  possibilità  di  registrazione  dei 
file  in  arrivo  (manuale,  automatica  o  con 
la  funzione  XON/XOFF). 


ctions”  è  quella  di  preparare  un  messag¬ 
gio  “di  ritorno”  che  ci  verrà  inviato  ogni 
volta  che  il  calcolatore  ospite  riceverà  un 
nostro  file. 

TAB  SETTINGS  E  KEYBOARD  LAYOUT 

Il  “Tab  settings”  consente  di  fissare  dei 
tab  in  qualunque  punto,  anche  ogni  N 
colonne.  “Layout  keyboard”  va  utilizza¬ 
ta  invece  per  ridefinire  i  tasti  nel  caso  la 
trasformazione  in  tastiera  inglese  o  statu¬ 
nitense  non  sia  stata  sufficiente. 

IMPRESSIONI  D'USO 

Più  complesso,  ma  anche  più  completo, 


considerazione  i  prezzi. 

Il  più  economico  è  Flash,  della  Antic  che 
viene  offerto  a  meno  di  40  dollari.  È  cer¬ 
tamente  poco  e  il  suo  prezzo  è  giustifica¬ 
to  non  dalla  bassa  qualità  del  program¬ 
ma,  ma  dall’assenza  di  un  emulatore. 
Segue  a  ruota,  ancora  una  volta  tra  i  più 
economici,  un  programma  della  Kuma 
Computers,  distribuito  dalla  Atari  Italia. 
69.000  lire,  Iva  compresa,  è  il  prezzo  di 
questo  emulatore,  più  pacchetto  di  co¬ 
municazione,  che  non  si  colloca  certo 
nella  fascia  bassa  di  prestazioni. 

Con  50  sterline  di  prezzo  d’acquisto  pos¬ 
siamo  avere  FaSTcom,  semplicissimo  ed 
ideale  per  il  neofita. 


mia  Htm 


2  -  Interface  setup 


3  -  Styie  optfens 

4  *  File  protocol 

5  -  File  fonetici» 

6  -  Hodef*  control 

?  -  Other  functions 

8  *  Tab  settings 

9  -  Keyboard  layout 

Space  -  nove  to  iten  Backspate  -  previous  iteri 

Enter  -  change  this  iten  Esc  -  leave  «enu 
nonber  -  chtnge  iten  ?  -  help  on  this  iten 


This  Set  lip  is  far;  X¥2 
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Full  I2:00an  C  0:00 


Interface  Setup  Henu 


1  -  locai,  Echo,  or  Full  duplex;  no*  Full 

2  -  Send  XOH/XQFF  CAS/A0)  to  thè  host?  Ho 
2  -  Receive  X0H/X0FF  fren  thè  host?  Ho 

4  -  RHSI  or  mi  mési  non  UNSI 

5  -  Hake  Enter  send  €R  or  CR-LF;  nm  Ol 

6  -  Character  sent  by  thè  Back  „uce  key;  non  DEI 
?  -  Hake  received  CRs  do  (31  or  CR-LF;  nm  CR-LF 

S  -  Hake  receiued  LFs  do  LF  or  CR-LF;  nm  LF 


Space  -  nove  to  iten 
Enter  -  change  this  iten 
nunber  -  change  iteri 


Backspate  -  previous  iten 
Esc  -  leave  nenu 
?  -  help  on  this  iten 


Rvaiìable  speeds  are  8  for  no  delay  and  any  speed  hetneen  i  baod  and 
thè  transnission  speed . 

Enter  your  desired  speed;  | 
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FILE  FUNCTION 

È  il  menu  di  controllo  dei  file.  Serve  a 
mandarli,  a  riceverli  o  ad  aggiungerne 
uno  nuovo  a  quelli  già  esistenti.  Da  nota¬ 
re  che  i  file  ricevuti  vengono  inviati  ad  un 
buffer  chiamato  History  che  può  essere 
sempre  visionato.  Ovviamente  la  capien¬ 
za  di  questa  parte  di  memoria  è  ridotta, 
ma  spesso,  nel  caso  ci  dimentichiamo  di 
avviare  la  registrazione,  può  tornare 
utile. 

MODEM  CONTROL 

Qui  troviamo  le  funzioni  per  il  collega¬ 
mento  con  l’host  computer.  Oltre  a  “Diai 
thè  phone”  e  a  “Phone  number”  abbia¬ 
mo  anche  l’opzione  per  far  partire  auto¬ 
maticamente  il  collegamento  al  momen¬ 
to  dell’accensione. 

OTHER  FUNCTIONS 

Per  nostra  comodità  possiamo  scrivere  il 
nome  del  sistema  con  il  quale  siamo  col¬ 
legati  tramite  la  funzione  “Computer 
System  name”  e  definire  i  tasti  funzione, 
sempre  utili.  Possiamo  controllare  in 
ogni  momento  cosa  abbiamo  assegnato 
ad  essi  con  il  comando  “Show  function 
keys”  e,  una  volta  definitone  il  contenu¬ 
to,  possiamo  salvarli  per  un  futuro  riuti¬ 
lizzo. 

Comoda  anche  la  funzione  di  “Reset”, 
che  evita  di  dover  spegnere  il  computer  e 
quindi  ricaricare  il  programma. 

Ùltima  possibilità  delle  “Other  fun- 


PC/InterComm  consente  un’ampia  flessi¬ 
bilità  nei  collegamenti,  grazie  all’elevato 
numero  di  protocolli  che  può  utilizzare. 
Spesso  utile  si  dimostra  l’opzione  di 
scrolling  (Slow  o  Normal)  che  consente 
di  vedere  tutti  i  dati  ricevuti  un  po’  più 
lentamente. 

Necessaria,  e  presente,  quella  che  per¬ 
mette  di  abbassare  l’effettiva  velocità  di 
trasmissione,  specialmente  se  la  linea  te¬ 
lefonica  è  disturbata. 

Un  programma  completo  con  un  manua¬ 
le  veramente  notevole. 

CONCLUSIONI 

Un  breve  giudizio  sulle  qualità  dei  singoli 
programmi  lo  abbiamo  già  dato  al  termi¬ 
ne  di  ciascuna  prova,  ora  prendiamo  in 


PC/InterComm  è  il  più 
professionale,  o  il  più 
costoso,  tra  i  pacchetti  di 

Molto  voffscrtilo!Tconod€rto 
da  un  ottimo,  o  voluminoso, 
manuale  in  inglese  che 
spiega  tutto  quanto  vi  è  da 


Un  piano  più  sopra  invece  si  posiziona 
PC/InterComm  che,  con  249.000  lire,  Iva 
compresa,  si  rivolge  ad  un’utenza  più  se¬ 
lezionata. 

Come  abbiamo  visto  ci  sono  programmi 
per  tutti  i  gusti  e  per  tutte  le  tasche.  Im¬ 
portante  è  non  scegliere  a  caso,  ma  pen¬ 
sare  bene  alle  nostre  specifiche  esigenze. 
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SEZIONE  ST 


PASCAL  68000 

IL  METACOMCO  PASCAL  PERMETTE  DI  OVVIARE  A  TUT¬ 
TE  LE  LIMITAZIONI  IMPOSTE  DA  ALTRI  COMPILATORI 
NONCHÉ  DI  SFRUTTARE  IN  PIENO  LE  CAPACITÀ  GRAFI¬ 
CHE  E  DI  CALCOLO  DELLA  SERIE  ST 


DI  ANDREA  BORRONI 

Per  gli  amanti  della  programmazio¬ 
ne  strutturata  in  PASCAL,  questo 
prodotto  è  proprio  quello  che  ci 
voleva.  Sulla  base  delle  esperienze  passa¬ 
te  in  fatto  di  compilatori,  la  Metacomco 
ha  sviluppato  questa  applicazione  dedi¬ 
cata  per  soddisfare  le  esigenze  di  coloro 
che  fanno  del  PASCAL  il  loro  principale 
strumento  per  lo  sviluppo  di  programmi. 
Il  guadagno  in  velocità  di  risposta  è  qui 
significativamente  migliorato. 

È  possibile  poi  decrementare  ulterior¬ 
mente,  ed  in  maniera  drastica,  il  tempo 
di  compilazione  e  di  linking  se  si  ha  la 
possibilità,  utilizzando  una  famosa  utility 
in  circolazione,  di  installare  in  memoria 
centrale  un  disco  virtuale,  facendo  poi  la 
copia  di  tutti  i  file  presenti  sui  due  di¬ 
schetti  del  PASCAL  68000  in  questa  por¬ 
zione  di  RAM  riservata. 

PASCAL  STANDARD 

Tutti  i  concetti  del  PASCAL  definiti  da 
Wirth  sono  stati  puntualmente  rispettati 


in  questa  versione;  gli  statement,  le  paro¬ 
le  riservate,  i  simboli  speciali,  le  strutture 
dati,  ÌT/O,  la  questione  file,  la  sintassi  e 
la  semantica,  trovano  piena  corrispon¬ 
denza  nelle  definizioni  originali  del  lin¬ 
guaggio.  Lo  stesso  dicasi  per  i  parametri 
tecnici  più  specifici,  quali  l’ordine  del  set 


di  caratteri,  che  sono  pienamente  confor¬ 
mi  allo  standard  ISO  (ASCII). 

In  aggiunta  sono  state  implementate 
quelle  estensioni  che  permettono  una 
maggiore  flessibilità  in  fase  di  program¬ 
mazione.  Ne  menzioniamo  qui  le  più  si¬ 
gnificative: 

-  uso  di  identificatori  di  qualsiasi  lun¬ 
ghezza  (ma  non  distinzione  tra  minuscole 
e  maiuscole); 

-  campo  degli  INTEGER  pari  a  2  32 
(cioè  un  MAXINT  di  oltre  due  miliardi) 

-  campo  dei  REAL  con  esponente  di 
due  cifre  (+/- 99)  in  forma  normalizzata 

-  possibilità  di  mettere  in  relazione  IN- 
TEGER  con  REAL  (risultato  in  REAL) 

-  la  procedura  ‘NEW’  per  l’allocazione 
di  variabili  dinamiche  è  affiancata  dalla 
procedura  ‘DISPOSE’  che  ne  permette 
la  deallocazione; 

-  procedure  ‘PACK’  e  ‘UNPACK’  per 
l’impaccamento  e  il  disimpaccamento  di 
Array  e  la  procedura  PAGE‘  per  il  cam¬ 
bio  pagina; 

-  possibilità  di  dichiarazione  di  insieme 
unitamente  a  tipi  scalari  o  subrange 
(esempio  digit  =  SET  OF  0..9); 


D’altro  canto  ci  sembra  doveroso  far  os¬ 
servare  alcune  limitazioni  che  sono  state 
riscontrate  utilizzando  il  compilatore: 

-  limitata  profondità  di  nidificazione  di 
procedure  e  funzioni  (inferiore  al  decimo 
livello); 

-  impossibilità  di  usare  il  salto  incondi¬ 


zionato  GOTO  da  qualsiasi  punto  di  un 
programma; 

Per  quanto  quest’ultima  nota  non  do¬ 
vrebbe  preoccupare  i  programmatori 
PASCAL,  che  dei  GOTO  non  sanno  che 
farsene,  la  limitazione  sul  livello  di  nidifi¬ 
cazione  di  procedure  e  funzioni  ci  sem¬ 
bra  significativa,  seppur  piuttosto  remo¬ 
ta.  Solo  scrivendo  grossi  programmi,  in¬ 
fatti,  si  arriva  a  questi  livelli  di  nesting,  i 
quali,  al  limite,  possono  essere  aggirati 
ritoccando  l’organizzazione  del  pro¬ 
gramma. 

L'EDITOR 

Un  buon  compilatore  di  un  linguaggio  di 
programmazione  non  potrebbe  essere 
definito  tale  se  non  fosse  affiancato  da  un 
buon  EDITOR  per  la  scrittura  dei  pro¬ 
grammi.  Lo  SCREEN  EDITOR  del  PA¬ 
SCAL  68000  non  ha  molto  da  invidiare  a 
quelli  implementati  su  grossi  sistemi;  al 
solito  però  l’utente  è  costretto,  per  riu¬ 
scire  a  sfruttare  appieno  le  potenzialità 
del  prodotto,  a  prendere  confidenza  con 
una  carrellata  di  comandi  definiti  come 
combinazioni  del  tasto  Control  e  di  tasti 
alfanumerici. 

Tali  comandi  di  EDITOR  possono  esse¬ 
re  inviati  al  sistema  utilizzando  due  diffe¬ 
renti  modalità,  Immediata  o  Estesa. 

In  modalità  Immediata,  come  intuibile, 
l’effetto  di  un  comando  è  subito  visualiz¬ 
zabile;  ad  esempio,  sono  Immediate 
Commands  l’inserimento  o  la  cancella¬ 
zione  di  linee,  lo  spostamento  del  curso¬ 
re  lungo  punti  del  programma  o  il  tasto 
Return  stesso.  In  modalità  Estesa,  inve¬ 
ce,  alla  quale  si  ha  accesso  in  qualsiasi 
momento  mediante  il  tasto  Esc,  è  possi¬ 
bile  programmare  uno  o  una  serie  di  co¬ 
mandi  che  saranno  eseguiti  dal  sistema  in 
maniera  più  o  meno  trasparente  all’uten¬ 
te.  Ad  esempio  le  operazioni  di  salvatag¬ 
gio  o  inserimento  di  file,  il  movimento  di 
blocchi  di  linee,  la  ricerca  nel  testo  me¬ 
diante  stringhe  o  la  sostituzione  di  strin¬ 
ghe  stesse  con  altre,  sono  opzioni  sele¬ 
zionabili  in  Extended  Mode. 

Interessante  la  presenza  della  funzione  di 
UNDO  mentre  dobbiamo  rilevare  l’as¬ 
senza  di  un’opzione  che  permetta  il  posi¬ 
zionamento  all’interno  di  un  programma 
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tramite  flag  invisibili,  ad  esempio  flag 
numerici,  identificanti  posizioni  di  inte¬ 
resse  alle  quali  si  voglia  accedere. 

IL  COMPILER 

Una  volta  scritto  il  testo  del  programma, 
cioè  il  file  sorgente,  mediante  l’editor, 
per  produrre  da  questo  il  codice  oggetto 
(o  rilocabile)  bisogna  lanciare  la  compi¬ 
lazione.  Normalmente  al  momento  del 
lancio,  un  compilatore  crea  sul  dispositi¬ 
vo  di  memoria  di  massa  il  file  che  dovrà 
contenere  l’eventuale  risultato  esatto 
della  compilazione. 

Il  compiler  del  PASCAL  68000  permette 
però  di  eseguire  una  compilazione  anche 
senza  creare  alcun  codice  oggetto,  il  che 
può  essere  utile  in  fase  di  scrittura  di  un 
lungo  programma,  qualora  si  voglia  di 
volta  in  volta  verificare  l’assenza  di  errori 
nel  codice  scritto  fino  a  quel  momento. 
E  questa  una  delle  nove  opzioni  selezio¬ 
nabili  nella  linea  di  comando  che  richia¬ 
ma  il  compilatore.  Questa  ed  altre  inte¬ 
ressanti  modalità  di  compilazione  sono 
selezionabili  inserendo  una  o  più  di  que¬ 
ste  opzioni,  che  permettono,  a  scelta,  di 
ottenere  un  listato  della  compilazione 
(opzione  LIST),  oppure  di  decidere  il 


formato  del  programma  oggetto  a  secon¬ 
da  del  linker  che  si  vorrà  utilizzare 
(LINK,  presente  su  questo  package,  o 
LINK68,  fornito  nel  kit  Atari  Software 
Developer,  ambiente  CP/M-68K)  o  an¬ 
cora,  di  ridirigere  il  file  relativo  ai  mes¬ 
saggi  d’errore. 

Diverse  scelte,  quindi,  che  vogliono  ve¬ 
nire  incontro  alle  diverse  esigenze  richie¬ 
ste  dall’ambiente  e  dalle  modalità  di  la¬ 
voro  del  programmatore. 

IL  LINKER 

Anche  le  operazioni  di  linking  del  pro¬ 
gramma  oggetto  creato  dalla  compilazio¬ 
ne  sono  relativamente  semplici  e  veloci. 
Alla  chiamata  del  linker  viene  richiesto 
di  inserire  la  linea  di  comando  per  il  con¬ 
trollo  delle  modalità  di  lincaggio.  Anche 
in  questo  caso  sono  definibili  diverse 
azioni  relative  alla  produzione  del  risul¬ 
tato;  ad  esempio  è  possibile  generare  o 
meno  una  tavola  dei  simboli  o  una  map¬ 
pa  del  layout  del  file  eseguibile. 

Da  notare  che  il  software  del  PASCAL 
68000  è  stato  fornito  di  una  nutrita  libre¬ 
ria  di  funzioni  che  permettono  di  utilizza¬ 
re  le  capacità  grafiche  del  computer.  Per 
accedere  a  queste  librerie,  però,  il  co¬ 


mando  va  impartito  al  momento  del  lan¬ 
cio  della  compilazione  e  non  in  fase  di 
linking. 

Ultima  osservazione:  il  codice  eseguibile 
prodotto  dal  linker  è  effettivamente  un 
file  eseguibile  in  qualsiasi  momento,  sen¬ 
za  dover  fare  alcuna  operazione  di  pre¬ 
definizione  dell’ambiente  di  lavoro. 

CONCLUSIONE 

Un  uso  accurato  e  continuo  di  PASCAL 
68000  permetterà  di  scrivere  programmi 
di  elevato  livello  professionale  e  di  alta 
funzionalità.  Non  c’è  quindi  molto  da  ag¬ 
giungere  se  non  il  consiglio  di  familiariz¬ 
zare  con  tutti  i  comandi  prima  di  dare 
inizio  alla  stesura  di  un  lungo  progamma, 
così  da  trovarsi  in  condizioni  di  sveltire  le 
operazioni  di  editing,  di  compilazione  e 
di  linking. 


Nome:  MCC  Pascal  68000 
Produttore:  Metacomco  Ltd.  (GB) 
Distributore:  Hard  &  Soft,  Terni 
Tipo:  linguaggio  di  programmazione 
Configurazione:  Atari  520  ST,  1  drive 
Prezzo: 
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uso  E  ABUSO 

01  UH 

noppr 

DISK 


DI  ROBERTO  CAZZARO 


LA  SECONDA  PUNTATA 
DEL  RAPIDO  CORSO  IN  C  SULLA 

STRUTTURA  E  IL 
FUNZIONAMENTO  DEL  FLOPPY 

DISK  ATARI  ST. 


Sapevo  che  prima  o  poi  sarei  stato 
costretto  a  porgere  le  mie  scuse  ai 
lettori  a  causa  di  un  errore  in  un 
programma,  ma  speravo  che  accadesse  il 
più  tardi  possibile.  Invece  eccomi  qui, 
alla  seconda  puntata,  a  cospargermi  il  ca¬ 
po  di  cenere  a  causa  di  un  banale  errore. 
Mi  spiego  meglio:  come  faccio  d’abitudi¬ 
ne,  ho  distribuito  fra  vari  amici  il  mio 
programma  perché  ne  verificassero  il 
perfetto  funzionamento  e,  avendo  rice¬ 
vuto  risposta  positiva,  ho  fatto  avere  il 


programma  al  direttore  della  rivista  per 
la  pubblicazione;  dopo  qualche  giorno 
uno  dei  miei  amici  mi  viene  a  dire  che  a 
lui  il  mio  programma  sembra  un  schifez¬ 
za  perché  non  si  comporta  come  descrit¬ 
to  nell’articolo;  mi  metto  subito  al  lavoro 
con  lui,  ma  a  casa  mia  tutto  è  ok;  dopo 
alcune  ore  perse  nel  verificare  le  ipotesi 
più  assurde  (influenza  della  posizione 
astrale  di  un  computer  rispetto  all’altro, 
oroscopo  dell’operatore  ecc.),  provo  a 
chiedere:  “Ma  tu  che  Basic  usi?”  -  “Il 


Gfa  Basic  come  mi  hai  detto”  -  “Si,  ma 
quale  versione?”  -  “La  versione  1.0”  - 
Boink! 

E  così  si  spiega  tutto:  infatti  la  versione 
1.0,  oltre  ad  avere  molti  “bug”  più  o  me¬ 
no  nascosti,  manca  di  alcune  istruzioni  e 
altre  si  comportano  in  maniera  diversa; 
nel  mio  caso  le  differenze  riguardano  le 
costanti  True  e  False  (non  definite  nella 
prima  versione)  e  la  funzione  Inp(n)  che 
restituisce  solo  i  codici  Ascii  (a  proposi¬ 
to,  sapete  come  si  pronuncia  Ascii?  con 
la  ‘c’  dura,  visto  che  gli  anglosassoni  non 
hanno  la  ‘c’  dolce,  quindi  qualcosa  come 
‘askii’)  e  non  il  valore  dei  tasti  tipo  frecce 
e  simili. 

Conoscere  bene  il  problema  è  come 
averne  già  la  soluzione  e  i  possessori  del¬ 
la  versione  1.0  potranno  digitare  le  modi¬ 
fiche  della  tabella  1  ;  in  ogni  caso  è  possi¬ 
bile  richiedere  la  versione  2.0,  e  io  lo 
consiglio,  spedendo  il  disco  originale  alla 
Gfa  e  richiedendo  l’ultima  release;  que¬ 
sto  se  si  è  in  possesso  della  versione  origi¬ 
nale,  altrimenti.... 

Il  modo  migliore  per  controllare  quale 
versione  si  possiede,  consiste  nello  scri¬ 
vere,  a  memoria  libera  e  in  ‘direct  mo¬ 
de’,  la  seguente  linea  di  programma: 
Print  True 
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Tabella  1 


Correzioni  al  programma  della  puntata 
precedente,  per  i  possessori  del  Gfa  basic 
versione  1.0 

Inserire  verso  Pinizio  del  programma,  dopo 
Logicai =0 

e  prima  di  MAIN,  le  seguenti  linee 

True-1 

False =0 

e  sostituire  la  procedura  WAIT 
con  la  seguente: 

Procedure  Wait 
Repeat 

R=Gemdos(7) 

Rh=(R  Div  65536)  Mod  256 
R=R  Mod  256 

If  Rh>=71  And  Rh<=90  Then 
R=Rh+128 
Endif 

Until  R=27  Or  R=200  Or  R=208  Or 
R=203  Or  R=205  Or  R=199  Or 
(R>=48  And  R<=57) 

Return 

La  funzione  Gemdos(7)  restituisce  una  word 
che  contiene  lo  Scan-code  del  tasto  nel  byte 
alto  e  il  codice  Ascii  nel  byte  basso. 

Con  queste  modifiche  il  programma 
funzionerà  perfettamente. 


La  risposta  sarà  0  per  le  versioni  prece¬ 
denti  la  2.0  e  —1  per  le  versioni  seguenti 
la  2.0. 

Detto  questo  iniziamo  a  trattare  l’argo¬ 
mento  della  puntata. 

UN  PO'  DI  RIASSUNTO 

Cominciamo  col  ripetere,  brevemente,  i 
punti  principali  esposti  nel  precedente 
articolo: 

-  Il  disco,  mediante  formattazione,  vie¬ 
ne  diviso  in  settori  e  tracce,  generalmen¬ 
te  80  tracce  e  9  settori. 

-  Per  comodità  si  trattano  solo  i  settori 
logici,  720  o  1440  a  seconda  che  il  disco 
sia  a  singola  o  a  doppia  faccia,  e  i  cluster 
(=  insieme  di  due  settori  logici  consecu¬ 
tivi). 

-  Ógni  settore  logico  contiene,  oltre  ai 
segnali  di  sincronismo,  512  byte  di  dati. 
Tutto  ciò,  comunque,  non  spiega  come 
sia  possibile  capire  quale  tipo  di  disco  si 
sta  usando,  né  come  si  acceda  ai  vari  file 
presenti  su  di  esso.  Scopo  di  questo  se¬ 
condo  articolo  è  quello  di  spiegare  l’or¬ 
ganizzazione  del  disco,  così  come  viene 
visto  dal  sistema  operativo. 

Vi  sarà  capitato  di  leggere  che  il  ‘Boot 
sector’  dell’ Atari  è  compatibile  con  quel¬ 
lo  dell’IBM.  Bene,  ma  cosa  significa  tut¬ 
to  questo? 

Il  BOOT  StCTOR 

Ogni  sistema  operativo  che  si  rispetti,  ri¬ 
serva  una  parte  del  disco  alle  informazio¬ 
ni  relative  al  tipo  di  formattazione  usata, 
alle  caratteristiche  fisiche  del  disco  e  ad 
altre  informazioni  accessorie;  di  solito 
questi  dati  sono  memorizzati  in  un  setto¬ 
re,  il  cosiddetto  Boot  sector  (cioè  settore 
che  viene  letto  all’accensione  e  inizializ- 


Programma  per  la  lettura  e  la  stampa  del  Boot  sector 
Prima  versione:  19/3/1987 

Autore:  Roberto  "Headache"  Cassaro 


'  Funzione  per  la  lettura  di  un  settore  logico  (da  0  a  720) 

'  Non  viene  fatto  nessun  controllo  se  il  parametro  passato  e'  compreso  nei 
*  limiti  quindi  si  ponga  attenzione  a  non  inserire  Logicai  maggiore  di  730! 

Def fn  Read. sec t ( Logica 1 )  =  Xbios ( 8 , Buf__high ,Buf„Iow , 0 , 0 , Devno, Logicai  Mod  9+1 ,Logi 
cal  Div  9,Sideno,l) 

'  Funzione  per  leggere  una  word  in  memoria  con  la  convenzione  Intel 

Def f n  I peek ( Ind ) =Peek ( Ind ) +256#Peek ( Ind+1 ) 

'  Dimensionamento  Buf  fer  e  ini. z ial  i z zaz ione  variabi  l  i 

Dim  A*/. (256) 

Bu f  fer==Va r p t r  (  A*/.  (  0  )  ) 

Buf  high=Buf f e r  Div  65536 
Buf low~Buf ter  Mod  65536 
Sideno=0 
Devno=0 


'  MAIN 

Cls 

Gosub  Pr.  info 

Repeat 

!  attende  la  pressione  di  un  tasto  e  torna 
!  all' editor 

Until  I  ni  oy  $  CV  1 
Edit 

'  Procedura  per 

la  stampa  del  Boot  sector 

Stampa  tutte  le  informazioni  contenute  nel  Boot  sector 

Per  maggiori  informazioni  sul  significato  si  veda  la  tabella  2 


Procedure  Pr . info  •  *- 

Ret=Fn  Read_sect(0)  !  legge  il  settore  logico  0 

Print  "Filler  =  "  ;  !  stampa  il  nome  del  costruttore,  non  usato 

For  1=2  To  7 

Pr in t  C hrS ( Peek ( I +Buf f er ) ) ; 

Ne  x  t  I 


Print 
P  r  .i  n  t 
Print 

"Serial  number  = 
"Bytes/sect  =  ";Fn 

i  Dpeek ( Buf f er+8) *256+Peek ( Buf fer+10) 

Ipeek (Buf fer+li ) 

Print 

"Sec tors/c luster  = 

" ; Peek (Buf fer+13) 

P  r  i  n  t 

"Reserved  sectors  - 

=  " ; Fn  Ipeek (Buf fer+14) 

Print 

"Number  of  fats  =  1 

1  ; Peek (Buf fer+16) 

P  r  i  n  t 

"Directory  entries 

=  " ; Fn  I peek ( Buf f er+17 ) 

Print 

"Sectors  on  media  = 

=  ” ;Fn  I peek ( Buf fer+19 ) 

Print 

"Media  type  =  " ; Peek ( Buf fer+21 ) 

Print 

"Sectors  per  FAT  " ; 

;  Fri  I  peek  (  Buf  f  er+22  ) 

Print 

"Sectors  per  track 

=  " ; Fn  I peek ( Buf fer+24 ) 

Print 

"Number  of  sides  = 

" ;Fn  I peek ( Buf fer+26 ) 

Print 

"Hidden  sectors  =  1 

1  ; Fn  I peek ( Buf  f er+28 ) 

Return 

Tabella  2 

Il  Boot  sector  contiene: 

-  un  numero  seriale  che  identifica  univocamente  (si  spera)  il  disco  in  uso  e  che  viene  usato  per 
verificare  il  cambio  disco 

-  i  parametri  del  bios  (dati  del  disco) 

-  ilcodice,  opzionale,  di  bootstrap,  cioè  quel  codice  che  viene  usato  per  eseguire  automatica- 
mente  un  programma  all’accensione. 

Gli  ultimi  due  byte  servono  affinché  il  checksum  (=  somma  per  verificare  l’esattezza  dei  dati 
contenuti  nel  settore)  sia  uguale  a  $1234.  Per  maggiori  informazioni  si  veda  “A  Hitchhiker’s 
guide  to  thè  Bios”. 


Contenuto 

locazione 

commento 

Bra.s  nnnn 

$00 

Salta  al  boot  code,  più  avanti  nel  settore 

Filler 

$02 

Riservato  al  nome  del  costruttore,  non  usato 

Serial 

$08 

Numero  seriale  del  disco 

Bps 

$0b 

Numero  di  settori  per  settore 

Spc 

$0d 

Numero  di  settori  per  cluster 

Res 

$0e 

Numero  settori  riservati  al  Dos 

Nfats 

$10 

Numero  di  Fat  presenti 

Ndirs 

$11 

Numero  massimo  di  file  nella  directory 

Nsects 

$13 

Numero  di  settori  presenti  sul  disco 

Media 

$15 

Descrittore  del  disco,  non  usato 

Spf 

$16 

Numero  di  settori  riservati  alla  Fat 

Spt 

$18 

Numero  di  settori  per  traccia 

Nsides 

$la 

Numero  di  facce  del  disco 

Nhid 

$lc 

Numero  di  settori  “nascosti” 

Boot 

$le 

Inizio  del  boot  code 

Check 

$lfe 

Bytes  di  checksum 
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zazione  del  sistema).  Il  boot  sector  per¬ 
mette  di  usare  le  più  disparate  formatta¬ 
zioni  e  tipo  di  dischi  (3.5"  o  5.25")  senza 
grossi  problemi  di  compatibilità;  ad 
esempio  l’IBM  utilizzava  dischi  a  40  trac¬ 
ce,  8  settori  e  doppia  faccia  (=320 
Kbyte)  nella  versione  1.0  del  PC-DOS, 
mentre  ora  utilizza  40  tracce,  9  settori  a 
doppia  faccia  (=360  Kbyte),  senza  modi¬ 
fiche  al  drive  o  ai  programmi  di  gestione. 
Il  Boot  sector  può,  eventualmente,  con¬ 
tenere  un  piccolo  programma  in  linguag¬ 
gio  macchina,  detto  “loader”  o  “Boot  co¬ 
de”  che,  se  presente,  esegue  automatica- 
mente  l’inizializzazione  del  sistema  e 
“prende  le  redini”,  di  solito  richiamando 
un  programma  più  complesso  residente 
sul  disco:  era  ciò  che  accadeva  quando  il 
nostro  Atari,  non  avendo  il  sistema  ope¬ 
rativo  in  ROM,  era  costretto  a  caricarse¬ 
lo  ogni  volta  da  disco.  Se  provate  a  con¬ 
frontare  il  boot  sector  di  un  disco  con  il 
vecchio  sistema  operativo  con  un  qualun¬ 
que  altro  disco,  noterete  una  profonda 
differenza. 

Il  Boot  sector  è  il  settore  logico  0,  cioè  il 
primo  ad  essere  letto  e  corrisponde  sem¬ 
pre  al  settore  1,  traccia  0,  lato  0,  sia  per 
dischi  a  singola  che  a  doppia  faccia. 

Per  visualizzare  la  struttura  del  boot  sec¬ 
tor  si  veda  la  tabella  2. 

La  compatibilità  IBM  si  riferisce  al  fatto 
che  le  informazioni  relative  al  tipo  di  di¬ 
sco,  numero  settori  ecc.  sono  disposte 
come  nel  Boot  sector  di  un  disco  IBM: 
ciò  significa  che  se  si  inserisce  un  disco  a 
3.5"  di  un  IBM  Ventiquattrore  (il  model¬ 
lo  trasportabile),  è  possibile  leggere  le 
informazioni  e  i  file  ivi  contenuti,  natu¬ 
ralmente  solo  il  file  testo  in  Ascii.  Se, 
come  me,  attaccate  un  drive  da  5.25"  (e 
prima  o  poi  spiegherò  come),  potrete 
leggere  anche  i  dischetti  dell’IBM  nor¬ 
male. 

Dopo  questa  breve  parentesi,  siete  pron¬ 
ti  per  inserire  il  programma  numero  1, 
relativo  alla  procedura  di  stampa  infor¬ 
mazioni  del  boot  sector.  A  proposito,  in 
questa  puntata  non  vi  darò  un  program¬ 
ma  completo,  come  la  volta  precedente, 
ma  un  insieme  di  procedure  e  funzioni, 
che  vi  aiuteranno  a  capire  meglio  la  strut¬ 
tura  del  disco;  la  prossima  puntata  sarà 
interamente  dedicata  ad  un  programma 
monitor  per  i  dischi,  che  vi  permetterà  di 
leggere  e  modificare  i  vostri,  e  non  solo 
vostri,  file. 

Un  problema  che  si  incontra  nel  leggere 
il  Boot  sector  è  che,  per  mantenere  la 
compatibilità  IBM  (e  vi  assicuro  che  ne 
vale  la  pena),  le  word  (=  parole  di  2 
byte)  seguono  il  formato  Intel,  cioè  il 
byte  più  importante  viene  per  secondo  e 
non,  come  in  casa  Motorola,  per  primo: 
in  poche  parole  i  due  bytes  sono  in  ordi¬ 
ne  inverso;  per  ovviare  all’inconveniente 
ho  scritto  la  funzione  I-peek  (address) 
che  si  incarica  di  sistemare  le  cose  (I- 
peek  stà  per  Intel-peek  e  si  usa  come  un 
Dpeek  -  address  -  normale). 

Del  programma  resta  poco  da  dire,  visto 
che  è  semplice  e  molto  commentato, 
pronto  per  essere  eseguito. 


Programma  per  la  lettura  e  la  stampa  della  Directory 
Prima  versione:  19/3/1987 

Autore:  Roberto  "Headache"  Cazzaro 


'  Nuova  funzione  per  la  lettura  di  un  settore  logico  (da  0  a  720  o  a  1440) 

'  Non  viene  fatto  nessun  controllo  se  il  parametro  passato  e‘  compreso  nei 
'  limiti  quindi  si  ponga  attenzione  a  non  inserire  Logicai  maggiore  di  730 
se  il  disco  &"  a  singola  faccia  e  1450  se  il  disco  e  a  doppia  faccia 

Deffn  Read sect (Logicai )=Xbios(8,L:Buf ,  L.  :  0  „  Devrto , Logicai  Mod  Spt+1 , Logicai  Div  S 
ector, (Logicai  Mod  Sector)  Div  Spt,Count) 

'  Funzione  per  leggere  una  word  in  memoria  con  la  convenzione  Intel 

De f  f  n  Ipee k  (  I  n d  )  =Peek  (  I  n d  )  +256* Peek  (  I  ri d  + 1  ) 

'  Dimensionamento  Buffer  e  iniziai izzazione  variabili 

Dim  A* (256) 

Buf=Varptr  (  A7.  (  0  )  ) 

Spt=9 
Sector ~9 
Devno=0 
Coun t=i 

*  MA  IN 

Cls 

Gosub  Get_info 
Gosub  Pr  dir 
Edit 

Procedura  per  la  stampa  della  directory. 

'  Stampa  il  nome  del  file,  sé  ev  una  directory  o  un  file  normale, 

'  il  settore  logico  di  partenza  e  la  lunghezza  del  file. 

N.B.  stampa  anche  i  file  cancellati,  facendoli  precedere  da  una 
'  sigma  minuscola. 

gy~  Qceclu  r  e  Fvri  1  r 
Lagic=Disp 
F 1 aq™0 

Ret=Fn  Read  __sect  (  Logic  ) 

Counter-Bu f 

Repeat 

If  Ret=0  Then 

Pr  in  t 

Pr in  t  "Nome  tipo  si  lunghezza" 

Pr  in  t 
Repeat 

Gosub  Get . dosname ( Coun ter ) 

Print  Dsnamel; 

Add  Coun ter, il 
If  Peek (Coun ter ) =16  Then 
Print  "  [DIR] 

Else 


Endif 

Add  Coun ter , 1 5 

Print  Right$  (  "  "+Str$  (  Fri  I  peek  (  Coun  ter  )  *2+14  )  ,  4  )  s 

Add  Coun'ter  „  2 

Print  Ri.ght$("  "+Str$(Fn  I  peek  (  Coun  ter  )  +65536*Fn  I  peek  (  Coun  ter+2  )),  1 

Add  Coun ter, 4 

Until  Peek  (Coun ter  )=0  Or  'Count.er=Buf  +5.1.2 
E 1  se 

F 1 aq=i 

Ine  Logic 

R  e  t  -  F  n  Read  __s  ect  (Logic) 

Court  ter =Buf 
Gosub  W&it 

U n  t  i.  1  P eeki  C o u n  t e r  )  =  0  O r  F 1  a g = 1 

'  Procedura  per  la  lettura  di  un  nome  secondo  le  convenzioni  del  Dos 

Si  noti  che  la  directory  e  i  nomi  seguono  il  formato  IBM 

Procedure  Get . dosname ( Ind) 

Osnamel*" " 

Por  1  =  1  nel  To  Ind +7 

Dsname$=Dsname$+Chr$ ( Peek ( I ) ) 

Me>;  t  I 

D s ridine $ = D s n a m e i  +  "  ..  " 

Por  I=Ind+8  To  Ind +10 

Dsnaffle$=Daname$+Q.hr $  ( Peek.(  I  )  ) 

Nex  t  I 

wPH  r fl  ‘  **'r'  m 1 1 

Pr ocedura  che  attende  la  pressione  di  un  tasto,  funziona  sia  con 
la  versione  1.0  che  con  2.0. 
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Procedure  Walt 
Locai  R 
R  =  I np ( 2 ) 

Procedura  per  la  lettura  dei  parametri  del  disco  e  della  funzione  Read . sect 

si  veda  l'articolo  per  spiegazioni. 

Procedure  6et_info 

Re!: -Pi,  Rea.:!  "sect  (0) 

If  Ret~0 

Sect_,no=Fn  Ipeek(6uf  +  19) 

Sides— Fn  I peek ( Buf +2ó ) 

Sp  !  •  P  I,  !  peek  (  bui  +  24  ) 

Fat_.lenght=Fn  I  peek  (  Buf +22  ) 

D i s  p~Pee  k ( Bu  f  +  i 6 ) % F n  Ipeek ( Bu  f  +22 }  +  i 
Sec tor«Spt$Sides 

Gosub  Errore 
End  i  f 
Return 

'  Procedura  di  stampa  errore  e  ritorno  a  editor 

Procedure  Errore 

Mesg$= "Errore  numero  "+Str$(Ret)+" .  !  ÌRitorno  all  editor" 

Alert  SjMesg^j,  1 ,  **  EDITOR  "  ,Dummy 

Edit 

Return 


UNA  MUOVA  READSECT 

Il  programma  della  puntata  precedente, 
nonostante  avessimo  parlato  di  dischi  a 
singola  e  a  doppia  faccia,  poteva  leggere 
solo  una  faccia  del  disco,  la  superiore  o 
inferiore,  a  seconda  del  valore  della  va¬ 
riabile  Sideno.  A  partire  da  questa  pun¬ 
tata,  tratterò  correttamente  i  dischi,  qua¬ 
lunque  tipo  siano,  leggendo  le  informa¬ 
zioni  relative  nel  Boot  sector  e  scrivendo 
una  nuova  funzione  Read_sect,  in  modo 
da  tener  conto  di  tutte  le  possibili  confi¬ 
gurazioni.  Cuore  di  tutto  è  la  procedura 
Get_info,  che  si  incarica  di  leggere  il 
Boot  sector  e  di  estrarne  i  valori  caratte¬ 
ristici,  assegnandoli  alle  variabili  Spt  (= 
settori  per  traccia),  Disp  (=  displace- 
ment,  settore  logico  di  inizio  della  direc¬ 
tory),  Sect_no,  numero  di  settori  sul  di¬ 
sco  e  Sector,  che  contiene  il  numero  di 
settori  per  traccia  moltiplicato  per  il  nu¬ 


mero  di  facce,  visto  che  il  sistema  opera¬ 
tivo  gestisce  la  seconda  faccia  come  una 
estensione  della  prima:  dove  finisce  una 
traccia,  lì  comincia  la  stessa  traccia,  ma 
sull’altro  lato,  per  minimizzare  gli  spo¬ 
stamenti  della  testina,  punto  debole  del 
disco.  La  funzione  ReacLsect  legge  il  di¬ 
sco,  convertendo  il  settore  logico  in  set¬ 
tore,  traccia  e  faccia  fisica  del  disco;  con 
un  minimo  di  prove  dovreste  poter  risali¬ 
re  alle  formule  usate  per  convertire  Logi¬ 
cai.  Leggendo  più  attentamente  i  manua¬ 
li,  in  tedesco,  mi  sono  accorto  che,  a  dif¬ 
ferenza  di  quanto  scritto  nella  puntata 
precedente,  è  possibile  passare  una  long 
word  ad  una  funzione,  semplicemente  fa¬ 
cendo  precedere  la  variabile  da  L:;  così 
si  spiega  quel  misterioso  L:0,  che  sta  per 
4  byte  (=  long  word)  a  zero.  Sempre  a 
proposito  dei  manuali,  consiglio  la  fre¬ 
quente  rilettura  di  tutti  quelli  in  vostro 
possesso.  Ho  scoperto  che  molte  persone 


Tabella  3 

Struttura  della  directory 

Descrizione 

lunghezza 

commenti 

Nome  del  file 

8  bytes 

In  caratteri  Ascii  maiuscoli 

Estensione 

3  bytes 

In  caratteri  Ascii  maiuscoli 

Attributo 

1  byte 

Vedi  oltre 

Riservato 

lObytes 

Riservto  per  usi  futuri  (a  0) 

Ora  e  data 

4  bytes 

Data  dell’ultima  modifica 

Cluster 

2  bytes 

Numero  del  primo  cluster 

Lunghezza 

4  bytes 

Lunghezza  del  file 

Descrizione  degli  attributi 

valore  numerico 

significato 

00 

Read-Write  /  visibile  /  normale 

01 

Ready  only  /  visibile  /  normale 

02 

Read-Write  /  nascosto  /  normale 

03 

Read  only  /  nascosto  /  normale 

04 

Read-Write  /  visibile  /  di  sistema 

05 

Read  only  /  visibile  /  di  sistema 

06 

Read-Write  /  nascosto  /  di  sistema 

07 

Read  only  /  nascosto  /  di  sistema 

08 

Volume  label 

16 

Folder  (subdirectory) 

non  conoscono  l’uso  del  tasto  Esc  da  De¬ 
sktop:  premendo  il  tasto  Esc,  quando  c’è 
una  finestra  attiva,  si  ottiene  l’aggiorna¬ 
mento  del  contenuto  della  finestra,  me¬ 
diante  rilettura  del  disco  nel  drive  cor¬ 
rente,  molto  più  comodo  che  non  chiude¬ 
re  e  riaprire  la  finestre  ogni  volta  che  si 
cambia  un  disco. 

14  DIRECTORY 

Passo  ora  a  descrivere  uno  dei  settori  più 
importanti,  la  directory,  che  si  incarica  di 
contenere  i  dati  relativi  alla  posizione  di 
ogni  file  all’interno  del  disco.  Ho  parlato 
di  settore,  anche  se  in  realtà  la  directory 
del  nostro  disco  si  estende  per  7  settori, 
dal  settore  logico  11  al  settore  logico  17 
compresi.  Siccome  però  in  alcuni  dischi 
non  standard  è  possibile  che  sia  in  altra 
posizione,  il  settore  di  partenza  si  calcola 
moltiplicando  il  numero  delle  Fat  (File 
Allocation  Table,  tabella  di  posizione  dei 
file)  per  la  loro  lunghezza  e  aggiungendo 
uno  al  risultato;  nel  programma  io  asse¬ 
gno  questo  valore  alla  variabile  Disp.  La 
directory  contiene,  per  ogni  file,  il  nome, 
il  tipo  (se  file,  subdirectory,  file  protetto 
ecc.),  la  data  di  creazione,  il  cluster  di 
partenza  e  la  lunghezza  come  viene  de¬ 
scritto  in  tabella  3.  Come  al  solito,  ho 
scritto  un  breve  programma  per  la  lettura 
delle  informazioni  nella  directory  e  ne  ho 
fornito  il  listato  (listato  numero  2);  dopo 
aver  lanciato  il  programma  appaiono  sul¬ 
lo  schermo  tutti  i  file  presenti  su  disco 
(20  alla  volta,  per  vederne  altri  venti  si 
prema  un  tasto  qualunque),  seguiti  dal 
tipo  di  file  (solo  se  subdirectory  appare  la 
scritta  DIR),  dal  settore  logico  di  parten¬ 
za  (ricavato  con  una  formula  empirica,  a 
partire  dal  numero  di  cluster)  e  dalla  lun¬ 
ghezza  del  file.  Si  notino  due  cose:  pri¬ 
mo,  anche  la  directory  segue  lo  standard 
Intel  per  i  numeri  e,  secondo,  i  file  can¬ 
cellati  non  vengono  fisicamente  rimossi, 
ma  ne  viene  posto  il  primo  carattere  a 
$E5,  229  in  decimale,  a  segnalare  che 
quella  “entry”  è  libera  (neH’Atari  i  setto¬ 
ri,  alla  formattazione,  vengono  posti  a 
229  e  non  a  0,  per  avere  un  migliore  con¬ 
trollo  sui  settori  difettosi).  Ho  voluta- 
mente  trascurato  di  interpretare  la  data  e 
i  tipi  di  file  in  modo  da  non  appesantire 
troppo  un  programma  che  serve  solo  co¬ 
me  demo  della  struttura  della  directory, 
anche  se  ho  dato  descrizione  del  tipo  di 
file,  il  cosiddetto  attributo,  nella  tabella 
3. 

Buon  lavoro,  dunque,  e  non  esitate  a  favi 
vivi  se  avete  qualche  problema  con  i  li¬ 
stati. 
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BOFFIN: 
SCRIVERE 
SENZA  LIMITI 


BOFFIN  E  UN  WORD  PRO¬ 
DI  MAURO  SCAIONI 

CESSOR  FRA  I  PIU  EVOLUTI 
ADATTO  ALL'ATARI  ST.  È  BA¬ 
SATO  SUI  CLASSICI  MENÙ 
PULL  DOWN  DEL  GEM, 
CON  IL  QUALE  SI  INTEGRA 
PERFETTAMENTE  COME  FI¬ 
NESTRA  DI  FUNZIONA¬ 
MENTO.  CONSENTE  NATU¬ 
RALMENTE  L'INSERIMENTO 
DI  GRAFICI  ED  IMMAGINI, 
IL  CUI  DISEGNO  È  POSSIBI¬ 
LE  GRAZIE  AD  UN  SOTTO¬ 
PROGRAMMA  INTEGRATO 
NEL  BOFFIN 


Boffin  è  un  nome  piuttosto  frivolo 
per  uno  dei  più  evoluti  programmi 
di  word  processor  disponibili  per  i 
sistemi  Atari  della  serie  ST.  Il  program¬ 
ma  è  prodotto  dairamericana  Software 
Punch  e  commercializzato  in  Italia  dalla 
Hard  &  Soft  di  Terni  (tei.  0744-46658). 
Le  sue  caratteristiche  gli  consentono  di 
integrarsi  alla  perfezione  con  il  sistema 
operativo  GEM  della  macchina.  Il  Boffin 
gira  infatti  in  una  window  che  può  essere 
ingrandita  e  rimpicciolita  a  piacimento 
così  come  può  essere  sovrapposta  ad  al¬ 
tre  finestre  in  cui  girano  differenti  pro¬ 
grammi  o  un’altra  task  del  Boffin  in  mo¬ 
do  da  poter  elaborare  più  testi  alla  volta. 
Del  sistema  GEM  il  Boffin  mantiene  tut¬ 
te  le  caratteristiche  operative,  dall’utiliz- 
zo  del  mouse  all’impiego  dei  menu  pull- 
down  per  la  programmazione  delle  diver¬ 
se  funzioni.  Un’ulteriore  feature  del  pro¬ 
gramma  è  quella  di  poter  inserire  nel  te¬ 
sto  grafici  e  disegni.  Questa  capacità,  co¬ 
mune  a  molti  word  processor  dell’ultima 
generazione,  è  però  particolarmente  cu¬ 
rata  nel  Boffin,  che  prevede  persino  una 
finestra  grafica  per  disegnare  diretta- 
mente  le  illustrazioni  o  per  generare  au¬ 
tomaticamente  diagrammi  a  torta  o  a 
barre. 

MODALITÀ  TEXT 

Uno  dei  pregi  maggiori  del  Boffin  è  sicu¬ 
ramente  la  facilità  d’uso.  Una  volta  lan¬ 
ciato  è  tutto  fatto:  si  può  tranquillamente 
iniziare  a  scrivere.  Sullo  schermo  sono 
normalmente  presenti  due  cursori:  quel¬ 
lo  del  testo,  a  forma  di  L  se  si  è  in  moda¬ 
lità  inserì  o  a  forma  di  I  se  ci  si  trova  in 
overwrite,  e  quello  del  mouse.  Quest’ul¬ 
timo  consente  di  puntare  i  menù  pulì 
down  e  di  avere  accesso  quindi  alle  varie 
funzioni  del  programma.  I  menù  disponi¬ 
bili  sono  9,  corrispondenti  ad  altrettante 
grandi  famiglie  di  comandi: 


Il  sagrato  della  sempli¬ 
cità  di  utilizzo  di  questo 
software  sta  nella  pre¬ 
senza  «lei  menù  pull- 
down.  È  cerne  avere 
sempre  a  disposiziona 
un  elenco  complete  dei 
comandi  utilizrabili. 
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DESK:  dà  accesso  a  quelle  funzioni  del 
GEM  che  siano  state  precedentemente 
attivate. 

FILE:  permette  di  compiere  tutte  le  ope¬ 
razioni  sui  file:  caricamento,  concatena¬ 
mento,  cancellazione...  In  più  dà  accesso 
anche  all’inserimento  nel  testo  di  finestre 
grafiche  precedentemente  memorizzate 
su  disco  ed  alla  gestione  di  tutte  le  fun¬ 
zioni  di  stampa.  Sono  infatti  disponibili 
due  differenti  tipi  di  stampa,  quella  velo¬ 
ce  (Quick  Print),  dove  non  vengono  ri¬ 
portati  gli  effetti  speciali  sul  testo  o  even¬ 
tuali  immagini  inserite,  e  quella  normale 
(Full  Print),  dove  vengono  abilitati  tutti 
gli  effetti  speciali  e  le  immagini  grafiche 
introdotte  nel  testo.  Sempre  da  questo 
menu  è  possibile  definire  il  tipo  di  stam¬ 
pante  che  si  intende  utilizzare.  Si  posso¬ 
no  sia  richiamare  le  caratteristiche  di  al¬ 
cuni  modelli  (già  presenti  sul  dischetto), 


durre  effetti  speciali  nel  testo:  italico,  ri¬ 
battuto,  sottolineato,  allargato...  Il  cam¬ 
biamento  vero  e  proprio  del  tipo  di  carat¬ 
tere  deve  invece  avvenire  caricando  il  fi¬ 
le-font  dal  disco. 

PAGE:  abbassando  il  menu  Page  si  ha 
accesso  a  tutta  una  serie  di  comandi  con¬ 
cernenti  il  layout  della  pagina  dattilo- 
scritta  più  alcune  funzioni  accessorie  (co¬ 
me  riferimento  di  un  cursore  graduato 
nella  fascia  alta  della  pagina  ed  il  passag¬ 
gio  al  modo  grafico). 

NETWORK:  consente  di  scambiare  testi 
o  parti  di  testo  tra  due  o  più  computer 
collegati  in  rete. 

HELP:  dà  accesso  a  schermi  di  aiuto  per 
le  varie  situazioni  operative  del  pro¬ 
gramma. 


testo  (sempre  nell’ambito  della  tavola 
grafica),  con  la  possibilità  inoltre  di  can¬ 
cellare,  spostare  o  copiare  porzioni  del 
disegno  stesso. 

TEXT  EFFECTS:  la  possibilità  di  scrive¬ 
re  testi  nella  finestra  grafica  è  notevol¬ 
mente  sviluppata  proprio  per  la  capacità 
del  Boffin  di  sintetizzare  un  grande  nu¬ 
mero  di  caratteri  ed  alterazioni  grafiche 
degli  stessi. 

DRAWING  MODE:  da  questo  menu  si 
scelgono  le  entità  da  disegnare  mediante 
il  mouse:  linee,  cerchi,  ellissi,  rettango¬ 
li....  Quello  che  però  è  fuori  dal  comune, 
è  la  possibilità  di  disegnare  in  modo  au¬ 
tomatico  diagrammi  a  torta  o  a  barre 
semplicemente  scrivendo  le  differenti  va¬ 


li  processore  grafico 
consente  non  solo  di 
realizzare  le  illustrazio¬ 
ni  desiderate  tramite  il 
mouse,  ma  anche  di  im¬ 
portare  immagini  da  al¬ 
tri  programmi* 


Una  «Ielle  caratteristi¬ 
che  del  Boffin  è  quella 
di  mostrare  sullo  scher- 

■iu>ntn  * _ 1— .1—  fluA||A 

Wuq? 

poi  verrà  stampato  sul 
foglio  cartaceo* 

sia  configurarne  di  completamente  nuovi 
inserendone  le  caratteristiche  in  un’ap¬ 
posita  maschera  sullo  schermo. 

ALTER:  da  questo  menu  è  possibile  ag¬ 
giungere  o  cancellare  blocchi  o  righe  di 
testo  in  qualsiasi  punto  dell’elaborato. 
MOVE:  come  suggerisce  il  nome  stesso, 
questo  menu  predispone  tutte  le  funzioni 
di  movimento  dei  blocchi  di  testo:  copia, 
taglio,  centramento,  riassestamento... 
FIND:  consente  di  ricercare  e/o  modifi¬ 
care  in  modo  automatico  qualsiasi  grup¬ 
po  di  caratteri  nel  testo. 

FONT:  da  questo  menu  è  possibile  intro- 


MODALITÀ  GRAPHICS 

Per  passare  al  funzionamento  in  modali¬ 
tà  grafica,  è  necessario  selezionare  l’ap¬ 
posita  opzione  del  menu  PAGE,  che  fa 
apparire  una  finestra  grafica  che  occupa  i 
2/3  della  parte  bassa  dello  schermo.  Nel 
contempo  i  menu  pulì— down  vengono 
sostituiti  da  nuove  versioni  contenenti  i 
comandi  necessari  alla  grafica: 

DESK:  ha  il  medesimo  significato  che 
nella  modalità  testo. 

FILE:  in  questo  caso  vengono  consentite 
le  operazioni  di  caricamento  e  salvatag¬ 
gio  delle  immagini  grafiche.  Esse  posso¬ 
no  avere  quattro  differenti  formati  per 
rendere  il  Boffin  compatibile  con  i  più 
diffusi  programmi  di  grafica  computeriz¬ 
zata:  si  possono  caricare  cioè  immagini 
con  file  Doodle,  Degas  e  Metafiles  non¬ 
ché,  naturalmente,  Boffin. 

MODE:  il  menu  Mode  permette  di  pas¬ 
sare  da  comandi  di  disegno  a  quelli  di 


riabili  in  maschere  che  compaiono  sullo 
schermo. 

OPTIONS:  questo  menù  consente  la 
scelta  di  alcuni  parametri  di  funziona¬ 
mento:  si  possono  variare  i  font  (della 
matrice  dei  caratteri)  della  funzione  text 
della  lavagna  da  disegno,  ed  è  anche  pos¬ 
sibile  determinare  lo  spessore  e  il  tipo  di 
linea  del  disegno  o  il  pattern  impiegato 
dalla  funzione  di  riempimento  di  area  del 
progamma. 

La  potenza  del  processore  grafico  del 
Boffin,  sta  soprattutto  nella  possibilità  di 
operare  anche  con  immagini  prodotte  da 
altri  programmi.  Nel  testo  esplicativo 
fornito  con  il  dischetto  del  Boffin  sono 
inseriti  diversi  esempi  di  grafica  tra  cui 
una  foto  passata  al  digitalizzatore:  la 
qualità  è  eccellente  e  la  possibilità  di 
sfruttare  appieno  le  avanzate  possibilità 
grafiche  del  sistema  Atari  ST  rendono 
questo  programma  tra  i  più  adatti  per  il 
Personal  Publishing.  Basta  infatti  avere 
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tonstr^ction 


Da  sottolineare  la  pos¬ 
sibilità  di  generazione 
automatica  di  diagram¬ 
mi  a  torta  o  a  barre. 


BOFFIN  WORDPROCESSOR 
TEXT  AND  PICTURES  FOR  THE  ATARI  ST 


IBWiTFIFlTIill 


Il  dischetto  del  Boffffin  è 
accompagnato  da  un 
manuale  d'uso  ■edotto 
in  lingua  inglese.  L'uti¬ 
lizzo  del  manuale  è  co¬ 
munque  limitato  alle 
fasi  di  approccio  al  pro¬ 
gramma,  dato  dio  la  fa¬ 
cilità  d'uso  «lei  Boffin  o 
la  disponibilità  di  Help 
in  linea  no  esdudono  la 
necessità  di  consulta- 


una  stampante  adeguata  (per  esempio  un 
modello  a  laser)  per  poter  realizzare, 
dalla  fase  di  impaginazione  a  quella  di 
preparazione  delle  patinate,  una  rivista  o 
ancor  più  facilmente,  un  libro.  Manca,  a 
nostro  parere,  la  possibilità  di  agganciar¬ 
si  ad  un  qualsivoglia  database  in  modo  da 
poter  eseguire  mailing  personalizzati. 
Tale  mancanza  è  però  comune  a  quasi 
tutti  i  programmi  di  word  processing  del¬ 
la  classe  del  Boffin. 

IMPRESSIONI  D'USO 

Quello  che  più  colpisce  chi  si  avvicina 
per  la  prima  volta  al  Boffin  è  la  sua  sem¬ 
plicità  d’uso.  Dopo  pochissimi  minuti 
che  lo  si  adopera  pare  di  averci  sempre 
lavorato.  Questo  è  dovuto  all’intuitivtà 
del  sitema  mouse  +  menu  pull-down  che 
non  richiedono  lo  sforzo  mnemonico  di 
mantenere  in  mente  qualsivoglia  coman¬ 
do:  sono  sempre  tutti  pronti  e  disponibi¬ 
li,  basta  esplorarli  col  mouse! 

La  possibilità  di  sbizzarrirsi  con  differen¬ 
ti  caratteri  e  dimensioni  degli  stessi  può 
creare  una  iniziale  confusione  nell’utiliz- 
zatore  non  abituato  a  questo  genere  di 
funzione. 

Passata  questa  fase  di  training  però  la 
flessibilità  tipografica  del  Boffin  non  tar¬ 
derà  a  farsi  apprezzare.  Molto  intuitivo 
risulta  anche  l’utilizzo  del  processore 
grafico  che  permette  di  realizzare  con  la 
massima  velocità  le  illustrazioni  per  i 
propri  testi. 

Se  a  questo  aggiungiamo  che  quello  che 
appare  sullo  schermo  è  ciò  che  realmente 
verrà  stampato  sul  nostro  foglio  di  carta, 
si  capisce  come  Boffin  sia  un  ottimo  pro¬ 
gramma  di  videoscrittura. 

Unendo  queste  particolarità  si  ottiene 


una  versatilità  di  lavoro  senza  eguali. 
L’unico  appunto  che  forse  si  può  rivolge¬ 
re  a  Boffin  è  che  per  cambiare  lo  stile  di 
scrittura  è  necessario  digitare  tutto  il  do¬ 
cumento  in  caratteri  normali  e  solo  suc¬ 
cessivamente,  selezionando  la  parte  di 
testo  da  trasformare,  è  possibile  avere  i 
caratteri  italici,  sottolineati,  in  grassetto 
e  così  via.  Non  è  ovviamente  un  grosso 
difetto,  ma  questa  operazione  può  costa¬ 
re  un  po’  di  tempo. 

Molto  semplice  risulta  invece  l’operazio¬ 
ne  di  spostamento  dei  margini,  che  si  ef¬ 
fettua  tramite  mouse  “trascinando”  l’in¬ 
dicatore  nella  posizione  voluta.  Realizza¬ 
re  un’immagine  da  inserire  nel  nostro  do¬ 
cumento  è  oltremodo  semplice  e  veloce 
grazie  alle  apposite  funzioni  implementa¬ 
te  nel  WP. 

CONCLUSIONI 

Il  Boffin  risulta  essere  un  programma  di 
stesura  testi  molto  potente  ed  articolato. 
Nonostante  la  notevole  flessibilità,  l’ap¬ 
prendimento  del  suo  utilizzo  è  rapido  e 
indolore.  I  particolari  che  più  si  fanno 
apprezzare  sono  la  simulazione  completa 
(compreso  il  tipo  di  carattere  e  di  corpo) 
del  testo  stampato  sul  video  del  compu¬ 
ter  e  la  possibilità  di  creare  e  gestire  di¬ 
rettamente  dal  programma  illustrazioni  e 
grafici  di  corredo.  A  proposito  dei  grafici 
rimarchiamo  l’importantissima  capacità 
del  Boffin  di  generare  in  modo  automati¬ 
co  diagrammi  a  torta  ed  a  barre. 

Prima  di  chiudere  va  fatta  un’ultima  con¬ 
siderazione  sul  prezzo,  che,  viste  le  pre¬ 
stazioni  del  prodotto,  si  potrebbe  crede¬ 
re  elevato.  Invece  è  una  lieta  sorpresa: 
con  74.000  lire  (Iva  esclusa)  possiamo 
iniziare  a  lavorare  con  il  nostro  Boffin! 
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SOFTWARE  ORIGINALE  D’IMPORTAZIONE 

DIRETTAMENTE  DALL’INGHILTERRA  OGNI  SETTIMANA  TUTTI  I  MIGLIORI  PROGRAMMI 

PER  ATARI  800/130  E  ATARI 520  ST 


ATARI  ST 


Toolkit  .  L.  59.000 

MS. Dos  Emulator  .  L.  149.000 

Me  Emulator  version  40  .  L.  399.000 

ST  Reai  Time  Clock .  L.  99.000 

ST  Check  Mate  (Scacchi) .  L.  39.000 

Art  Director  .  L.  129.000 

Championship  Wrestling  .  L.  49.000 

Superacele  .  L.  49.000 

Typhoon  .  L.  39.000 

Arkanoid .  L.  29.000 

Xevious  .  L.  49.000 


ATARI  800/130 


Solo  Flight  II  .  L.  18.000 

Leaderboard  .  L.  18.000 

Batallion  Commander  .  L.  18.000 

Green  Beret  .  L.  18.000 

Fight  Night  .  L.  18.000 

Gauntlet  .  L.  18.000 

Arkanoid .  L.  18.000 

Gun  Lau/  .  L.  5.000 

Kickstart .  L.  5.000 


E  moltissimi  altri 


Per  i  sigg.  Rivenditori: 

Servizio  novità  settimanale  per  essere  sempre  aggiornati  sugli  ultimi  giochi  in  arrivo. 
Per  maggiori  informazioni  telefonare  allo  0332/212255  (7  linee). 

MASTERTRONIC  s.a.s.  -  Via  \Aazz\i\\,  15  -  21020  Casciago  (Va) 

Tel.  0332/212255  -  Telefax  0332/212433 


- 

QUESTIONARIO 

In  questa  pagina  trovate  un  tagliando  per  poter  partecipare  attivamente  alla  vita  della  vostra  rivista  preferita:  potete 


ritagliarlo  e  poi  spedirlo  a  La  Rivista  di  Atari  - 

1.  Ti  piace  la  rivista  di  Atari?  □  molto  □  abbastanza  □  poco 

2.  A  quali  rubriche  daresti  più  spazio _ 


3.  Che  cosa  non  ti  piace? 


4.  Vorresti  nuove  rubriche?  Se  sì,  quali? 


5.  Ti  piacerebbe  che  la  rivista  di  Atari  fosse  □  quindicinale 
□  mensile  □  bimestrale 

6.  Compri  altre  riviste  del  settore?  Quali? _ 


Byte  -  Corso  di  P.ta  Romana  1  -  20122  Milano 

8.  Su  quale  supporto?  □  cassetta  □  disco 

9.  Quanti  programmi  possiedi? _ 

1 0.  Quanti  di  questi  sono  originali? _ 

1 1 .  Possiedi  un  computer?  Se  sì,  quale? _ 


1 2.  Usi  un  computer  non  tuo?  Se  sì,  quale? 


13.  Quale  configurazione  possiedi?  □  registratore  □  floppy 

□  stampante  □  monitor  b/n  □  monitor  colori  □  TV  color 

□  TV  b/n  □  plotter  □  altro 

1 4.  Quale  joystick  possiedi? _ 

15.  Possiedi  un  modem  o  un  accoppiatore  acustico?  □  modem 

□  accoppiatore  acustico 

1 6.  Ti  colleghi  con  qualche  banca  dati?  Se  sì  quale? _ 


7.  Quanti  programmi  per  Atari  hai  comprato  negli  ultimi  6  mesi? _  NOME _ COGNOME _ 

videogiochi _  Età _  Professione _ 

altri  programmi _  Via _  N° _  Città 
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SEZIONE  ST 


■  immillimi 

■  minimum 
■mmmmm 

immmm 

immuni 


LISTATI 


I  «GRETI  DEI 
GEM 


TUTTO  JL  GEM 

MINUTO  PER 

MINUTO 
ATTRAVERSO 
I  PROGRAMMI 

IN  C  CHE 
SFRUTTANO 

A  FONDO 
LE  ROUTINE 

DI  SISTEMA 

DI  DARIO  BRESSANINI 


Forse  sarà  capitato  anche  a  voi  di 
pensare  “Mi  piacerebbe  poter 
sfruttare  nei  miei  programmi  i  me¬ 
nù  a  discesa,  le  finestre  e  tutte  le  altre 
cosine  che  l’Atari  ST  e  il  GEM  mi  metto¬ 
no  a  disposizione,  ma  chissà  come  diavo¬ 
lo  si  fà!!’\  Se  siete  tra  questi,  allora  siete 
proprio  fortunati:  questo  articolo  e  quelli 
che  seguiranno  sono  ciò  che  fa  per  voi. 
L’Atari  è  una  splendida  macchina,  velo¬ 
ce  (più  del  PC  IBM),  verstile,  potente  ed 
è  un  vero  peccato  non  saperla  sfruttare  al 
meglio. 

Per  poter  utilizzare  i  menu,  le  icone,  le 
finestre  e  tutto  il  resto,  bisogna  imparare 
a  programmare  in  GEM,  cioè  ad  utilizza¬ 
re  le  routines  contenute  nelle  ROM  del 
computer.  Niente  paura,  non  è  necessa¬ 
rio  utilizzare  il  linguaggio  macchina,  si 
può  benissimo  usare  un  linguaggio  ad  al¬ 
to  livello:  C,  Pascal,  Basic;  beh,  a  dire  il 
vero  il  Basic  non  è  proprio  il  linguaggio 
adatto,  specialmente  l’ST  Basic,  anche  se 
con  il  GFA  basic  si  può  sfruttare  una 
buona  parte  delle  possibilità  del  GEM. 
Noi,  nel  nostro  viaggio  alla  scoperta  del 
GEM,  useremo  il  C,  poiché,  a  nostro 


modesto  parere,  è  il  linguaggio  migliore 
per  poter  spremere  l’Atari  fino  all’ultimo 
Bit. 

Attenzione,  questo  non  vuole  essere  un 
corso  di  C  per  principianti;  si  richiede 
una  minima  conoscenza  del  C.  Potete 
imparare  il  C  leggendo  il  corso  pubblica¬ 
to  su  BIT  o  leggendo  uno  tra  i  tanti  libri 
in  commercio;  noi  vi  consigliamo  “Lin¬ 
guaggio  C”  di  Kernighan  &  Ritchie,  gli 
inventori  del  C.  Il  libro  è  del  Gruppo 
Editoriale  Jackson. 

Il  compilatore  che  usiamo  è  il  Megamax 
C,  ma  il  programma  qui  pubblicato  viene 
compilato  correttamente  anche  dall’Al- 
cyon  C,  cioè  il  compilatore  C  fornito  dal- 
l’ Atari  nel  Development  Kit.  Se  utilizza¬ 
te  altri  compilatori  probabilmente  le  mo¬ 
difiche  da  effettuare  sul  programma  sono 
minime  e  in  seguito  vi  diremo  cosa  do¬ 
vrete  cambiare. 

INTRODUZIONE  Al  GEM 

Possiamo  definire  il  GEM  un  “Ambiente 
Operativo”. 

La  sigla  GEM  sta  a  significare  Graphic 
Environment  Manager.  Il  Gem  è  simile 


«nTracce 


<ì  Settori 
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ad  un  sistema  operativo:  potremmo  dire 
che  il  GEM  sta  alla  grafica  e  all’interfac¬ 
cia  utente  come  un  sistema  operativo 
classico  sta  alle  operazioni  di  IN¬ 
PUT-OUTPUT.  Esso  offre  all’utente  un 
modo  standard  di  utilizzare  le  risorse  del 
computer.  Il  GEM  agisce  da  interfaccia 
tra  l’utente  e  il  computer  in  modo  tale 
che  l’utente  non  si  debba  preoccupare 
direttamente  di  cose  come  il  tipo  di  mo¬ 
nitor  usato  o  di  stampante. 

Il  programmatore  non  deve  neanche 
preoccuparsi  direttamente  dei  menu  o 
delle  icone:  basta  che  dica  al  GEM  una 
volta  per  tutte  come  sono  fatti  i  menu,  le 
icone  e  tutto  il  resto.  Questo  tipo  di  ap¬ 
proccio  permette  di  trasportare  program¬ 
mi  addirittura  su  macchine  con  sistemi 
operativi  diversi  purché  sia  implementa¬ 
to  il  GEM:  basti  pensare  al  PC  IBM. 

Il  GEM  è  composto  da  2  segmenti  princi¬ 
pali:  l’AES,  cioè  Application  Environ- 
ment  Service,  e  il  VDI  o  Virtual  Device 
Interface. 

Il  VDI  si  occupa  della  grafica  di  base;  il 
nome  significa  Dispositivo  di  Interfaccia 
Virtuale.  Il  termine  “virtuale”  sta  a  signi¬ 
ficare  che  il  programmatore  non  disegna 
o  scrive  direttamente  sullo  schermo  o 
sulla  stampante  ma  su  una  “macchina 
grafica  virtuale”.  E  il  VDI  che  si  preoc¬ 
cupa  poi  di  tradurre  i  comandi  dell’uten¬ 
te  in  disegni  o  parole  da  stampare  sullo 
schermo,  sulla  stampante,  sul  plotter 
ecc.  ecc. 

L’AES  si  preoccupa  dell’interazione  col 
mouse,  con  i  menù,  con  le  finestre  ecc.. 
Offre  cioè  un  modo  standard  di  intera¬ 
zione  tra  programma  e  utente.  Sia  il  VDI 
che  l’AES  sono  a  loro  volta  suddivisi  in 
componenti,  ma  per  ora  non  ce  ne  occu¬ 
peremo. 

DESCRIZIONE  GENERALE  DEL 
PROGRAMMA 

Il  programma  qui  presentato  formatta  il 
disco.  “Bella  forza”  direte  voi  “lo  so  fare 
anche  io  scegliendo  FORMAT  dall’ap¬ 
posito  menu”. 

Quello  che  non  sapete  è  che  se  il  disco  è 
di  buona  qualità,  è  possibile  aumentare 
la  capacità  del  disco  formattandolo  in 
modo  leggermente  diverso  dal  solito.  Si 
ottengono  fino  a  50  KBytes  in  più  per  un 
disco  singola  faccia  e  fino  a  100K  per  un 
disco  a  doppia  faccia. 

Vi  è  un  prezzo  da  pagare  per  tanta  gra¬ 
zia:  non  potrete  più  copiare  il  disco  su  un 
altro  semplicemente  sovrapponenedo  le 
icone  dei  due  disk-drive;  dovete  o  utiliz¬ 
zare  uno  dei  tanti  copiatori  in  circolazio¬ 
ne  oppure  aprire  il  disco,  selezionare  i 
files  voluti  e  copiarli  sull’altro  disco. 
ATTENZIONE,  è  possibile  che  non  riu¬ 
sciate  ad  aumentare  la  quantità  di  Bytes 
utilizzabili  di  qualche  dischetto:  ve  ne  ac¬ 
corgerete  perché,  quando  tenterete  di 
scrivervi  sopra,  l’Atari  si  arrabbierà  mol¬ 
to.  Pazienza,  riformattatelo  normalmen¬ 
te;  il  problema  non  risiede  nel  programa: 
semplicemente  il  disco  non  sopporta  la 
maxi-formattazione . 


/*  */ 

/%  format. c  %/ 

/%  %/ 

/%  questo  programma  formatta  un  disco  */ 

/*  */ 

/%  si  può’  aumentare  la  capacita'  di  i mmagaz i namento  di  un  disco  %/ 

/%  (per  un  disco  a  singola  faccia  si  può'  giungere  a  oltre  400K  )  %/ 

/%  alterando  il  numero  di  tracce  e  di  settori  per  traccia  */ 

/*  */ 

/*  (C)  Dario  Bressanini  6  Gennaio  1987  */ 

/%  Versione  1.0  %/ 

/%  %/ 


^include  "obdefs.h" 


/* - */ 

/%  queste  macro  aumentano  la  protabi  1  ita'  da  %/ 

/%  un  compilatore  ad  un  altro  %/ 

/% - */ 


#def i ne 

WORD 

i  nt 

/* 

16  bi-t 

#def i ne 

LONG 

1  ong 

/* 

32  bit 

#def i ne 

BYTE 

char 

/* 

8  bit 

ttdef i ne 

VOID 

/%%/ 

/* 

n i ente 

#def i ne 

NULL 

0 

ttdef i ne 

ERROR 

-1 

ttdefine  N0_MEM0RY  -2 
ttdefine  OK  .  O 


/* - */ 

/%  interfaccia  col  sistema  operativa  %/ 
/% - - - - - %/ 


extern  LONG  xbiosO; 

extern  BYTE  *gemdos(); 

xbi  os  (9,  a,  h,,  c ,  d,  e,  f ,  g ) 
xbios(10,a,b,c,d,e,f,g,h,i) 
xbi os (18,a,b,c,d) 
gemdos (0x48, a) 
gemdos (0x49,  a) 


ttdefine  FI opwr (a, b, c, d, e, f , g) 
ttdefine  Flopfmt (a,b,c,d,e,f,g,h, i ) 
#def ine  Protobt (a, b, c, d) 
ttdefine  Malloc(a) 
ttdefine  Mfree(aì 


*/ 

*/ 

*/ 

*/ 


/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 
/%  external  */ 

/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 


extern  WORD  gl_apid;  /%  application  ID  %/ 

/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 
/%  variabili  globali  %/ 

/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 


WORD 

gem_handl e; 

/* 

handl e  del  desktop 

*/ 

WORD 

handl e; 

/* 

vdi _handl e 

*/ 

WORD 

i , dummy ; 

/* 

variabili  dummy 

*/ 

WORD 

contr 1 C 123  ; 

/* 

array  di  controllo 

*/ 

WORD 

i nt i n  C 1283  ; 

WORD 

ptsi n  C 1 28  3  ; 

WORD 

int outC 128  3  ; 

WORD 

ptsout C 1283  ; 

WORD 

wor k . i n  C 1 1 3  ; 

/* 

Input  di  v_opnvwk 

*/ 

WORD 

wor k_out C573 ; 

/* 

Output  di  v_opnvwk 

*/ 

/% - */ 

/%  struttura  dati  necessaria  per  */ 
/%  costruire  il  DIALOG  %/ 
/%  %/ 
/%  e'  stata  generata  dal  RESOURCE  %/ 
/%  CONTRUCT I ON  SET  */ 
/* - */ 


BYTE  *str  i  ngs  II  3  =  C 
"MAXI _ FORMATTATORE " , 
"By  Dario  Bressanini", 
"Format " , 

"Esci " , 

"9  Settori", 

"10  Settori", 

"Singola  faccia", 
"Doppia  faccia", 

"80  Tracce", 

"81  Tracce", 

"82  Tracce"}; 


41 


SEZIONE  ST 


□BJECT  treel C  3  =  C 

-1 ,  1,  13,  G_BOX,  NONE ,  OUTLINED,  0x21 100L,  0,0,  69,16, 

3,  2,  2,  G_BOX ,  NONE,  SHADOWED,  OxFEllOlL,  3,12,  63,2, 

1,  -1,  ~U  G  BOX,  NONE,  NORMAL,  OxFEU41L,  0,0,  13,2, 

4,  -1,  -1,  G_STRING,  NONE,  NORMAL,  OxOL,  12,1,  17,1, 

5 ,  -  r,  - 1 ,  GISTE  I NG ,  NONE ,  D I SABLED ,  Ox  IL,  35,1,  19,1, 

6,  -1,  -1,  G_  BUTTON ,  0x7,  SHADOWED,  0x2L,  58,3,  8,3, 

7,  -1,  -1,  G_BUTTON,  0x5,  SHADOWED,  0x3L,  58,7,  8,3, 

10,  8,  9,  G„BOX,  NONE,  NORMAL,  0xFF1141L,  3,3,  17,7, 

9 ,  '  --  1  ’  -  1  ,  G  BUTTON ,  Ox  1  1  ,  SHADOWED ,  Ox  4L  ,  1  ,  1  ,  15,2, 

7,  -1,  -1,  G  BUTTON,  Oxll,  SHADOWED,  0x5L,  1,4,  15,2, 

13,  11,  12,  G_BOX,  NONE,  NORMAL,  0xFF1121L,  21,3,  17,7, 

12,  -1,  -1,  gIbUTTON,  Oxll,  SHADOWED,  0x6L,  1,1,  15,2, 

10,  -1,  -1,  G_BUTTQN,  Oxll,  SHADOWED,  0x7L,  1,4,  15,2, 

0,  14,  16,  G  BOX,  NONE,  NORMAL,  0xFFU31L,  39,3,  17,7, 

13,  -1,  “1,  6_ BUTTON,  Oxll,  SHADOWED,  0x8L,  1,1,  15,1, 

16,  ~  1  ,  - 1 ,  G__  BUTTON ,  Ox  1 1  ,  SHADOWED ,  Ox  9L ,  1,3,  15,1, 

13,  -1,  “1,  G_ BUTTON,  0x31,  SHADOWED,  OxAL,  1,5,  15, 1  >  ; 

#def  i  ne  TREE1  0  /*  TREE  */ 

#def  i  ne  TRACCE80  14  /*  OBJECT  in  TREE  #0  */ 

ttrfe-fine  TRACCE81  15  /*  OBJECT  in  TREE  #0  */ 

#define  TRACCE82  16  /*  OBJECT  in  TREE  #0  */ 

#define  FORMATTA  5  /%  OBJECT  in  TREE  #0  %/ 

#def  ine  ESCI  6  /*  OBJECT  in  TREE  #0  */ 

ttde-fine  PROBOX  1  /*  OBJECT  in  TREE  #0  */ 

#de-fine  PROBAR  2  /*  OBJECT  in  TREE  #0  */ 

ttdefine  MAXI  3  /*  OBJECT  in  TREE  #0  */ 

#def i ne  DARIO  4  /*  OBJECT  in  TREE  #0  */ 

#de-fine  SETT9  8  /*  OBJECT  in  TREE  #0  */ 

#de-fine  SETT10  9  /*  OBJECT  in  TREE  #0  */ 

#define  SINGOLA  11  /*  OBJECT  in  TREE  #0  */ 

ttde-f  i  ne  DOPPIA  12  /*  OBJECT  in  TREE  #0  */ 

#def  i  ne  NUM_OBJ  16  /*  numero  di  oggetti  */ 

OBJECT  *tree_addr=treel ;  /#  puntatore  a  OBJECT  */ 


/*********** %%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%% % ********** ********/ 


/* 

/% 

i ni z i a ( ) s 

routine  di  i ni z i al i zz az i one 

*/ 

*/ 

/* 

return 

0 

nessun  errore 

%/ 

2 

non  può’  aprire  la  workstation 

*/ 

/  % 

/% 

non  può’  i niz i al i zzare  1 ’ AES 

*/ 

. . . - - -  - 

/% 

/**********************************************************************/ 


WORD 
i ni  2 i a ( ) 


if (  appl_init()  ==  ERROR  ) 
return  3; 

if  (  open_vwork()  ===  ERROR  ) 
return  2; 

gr af  _mouse ( 0 , Ox  GL )  ; 
return  OK ; 


/*  inizializza  AES  */ 

/*  apre  Virtual  workstation  */ 


/*  cambia  in  freccia 
/*  nessun  errore 


*/ 

*/ 


/**********.************************************************************/ 

/*  ter  minadive  Ilo)  ** 

VOI  D 

terminadi  vello) 

WORD  livello; 

{ 

switch  (  livello  )  /t  ci  sono  errori  9  */ 

•C  /%  nota  :  non  ci  sono  break  %/ 

/%  tutti  i  case  sono  in  */ 

/*  cascata  */ 


case  0: 

v  clsvwk (handle) ; 


appi _ex i t ( )  ; 


case 


/%  chiude  workstation  %/ 

/%  workstation  non  aperta  */ 

/%  esci 

/%  AES  non  i ni z i al i zz ato  */ 


/%  open  vworkO  :  return  0  ==  OK  ,  return  ==  ERROR  */ 


WORD 

open_vwor  kO 


USO  DEI  PROGRAMMA 

Il  programma  è  banale  da  usare.  Dopo 
averlo  fatto  partire,  avrete  sullo  schermo 
(bianco/nero  oppure  colore  in  media  ri¬ 
soluzione)  quello  che  potete  vedere  in 
figura  1. 

Il  pannello  che  vedete  è  chiamato,  tecni¬ 
camente,  un  DIALOG  (per  favore,  non 
usate  Titaliano  DIALOGO:  è  orrendo). 
Sul  DIALOG  vi  sono  dei  BUTTON  (se 
proprio  volete  usare  l’italiano,  non  usate 
il  termine  BOTTONI,  ma  TASTI)  me¬ 
diante  i  quali  potete  scegliere  il  tipo  di 
formattazione  voluta.  La  formattazione 
standard  è  di  9  settori  e  80  tracce;  sce¬ 
gliendo  10  settori  e/o  scegliendo  81  o  82 
tracce,  potete  aumentare  la  capacità  del 
dischetto. 

È  necessario  qui  spiegare  molto  breve¬ 
mente  come  è  strutturato  un  dischetto. 
Per  una  spiegazione  approfondita  vi  ri¬ 
mando  all’apposito  articolo  sui  segreti 
del  floppy-disk  pubblicato  in  questo  stes¬ 
so  numero  della  rivista. 

Un  disco  è  suddiviso  in  tracce:  queste 
sono  concentriche  e  vengono  numerate 
dall’esterno  verso  l’interno;  le  tracce 
normalmente  vanno  dalla  numero  0  alla 
numero  79,  quindi  su  un  dischetto  vi  so¬ 
no  80  tracce.  Ogni  traccia  è  divisa  radial¬ 
mente  in  settori,  di  solito  9;  un  settore 
contiene  512  bytes.  Questo  tipo  di  for¬ 
mattazione  è  stata  usata  dall’ATARI  per 
poter  essere  compatibile  con  la  formatta¬ 
zione  IBM:  infatti  i  nostri  drives  riescono 
a  leggere  i  dischi  IBM  da  3  pollici  e  mez¬ 
zo.  E  possibile  però  utilizzare  10  settori 
per  traccia  e  quindi  ottenere  0.5K  in  più 
per  ognuna  di  esse.  È  possibile  anche 
creare  tracce  in  più:  ovviamente,  poiché 
le  tracce  sono  concentriche,  le  tracce  in 
più  saranno  dei  cerchi  molto  piccoli,  vici¬ 
ni  al  centro  del  disco.  Se  i  cerchi  sono 
troppo  piccoli,  vi  possono  essere  dei  pro¬ 
blemi  di  densità  di  informazione;  TATA¬ 
RI  se  ne  accorge  e  vi  avverte.  Ma  non  è 
tutto:  non  è  possibile  avere  FISICA¬ 
MENTE  84  o  85  traccie  poiché  la  testina 
del  disk  drive  arriva  a  fine  corsa,  quindi 
non  tentate  di  modificare  il  programma 
per  ottenere  numeri  di  tracce  assurdi. 

Di  solito,  ma  non  sempre,  si  riesce  a  for¬ 
mattare  il  disco  con  81,  82  e  perfino  83 
tracce.  Già  con  83  tracce  la  testina  è  mes¬ 
sa  a  dura  prova  ed  è  per  questo  che  ab¬ 
biamo  deliberatamente  escluso  dal  pro¬ 
gramma  questa  possibilità. 


UTILIZZO  DELLE  MACRO  DI 
PORTABILITÀ 

Cosa  sono  le  macro? 

Il  C  ha  la  possibilità  di  sostituire,  in  fase 
di  compilazione,  una  qualsiasi  sequenza 
di  simboli  con  un’altra.  Ciò  si  può  fare 
attraverso  l’istruzione: 

#define  nomel  nome2 
Tutte  le  volte  che  il  compilatore  trova  la 
sequenza  di  simboli  ‘nomel’  la  sostitui¬ 
sce  con  la  stringa  ‘nome2’.  Tutto  ciò  può 
servire  a  definire  delle  costanti  simboli¬ 
che.  Tutto  ciò  vi  sarà  più  chiaro  se  osser¬ 
vate  il  programma:  parole  come  ER- 
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ROR  o  OK  comunicano  di  più  e  rendono 
più  leggibile  il  programma  rispetto  ai 
corrispondenti  -1  e  0.  Quando  il  compi¬ 
latore  trova  ERROR,  subito  lo  sostitui¬ 
sce  con  —1. 

In  testa  al  programma  sono  definite  delle 
“MACRO”  utili  per  permettere  la  porta¬ 
bilità  di  un  programma  da  un  compilato¬ 
re  ad  un  altro.  Vengono  definite  le  par- 
role  BYTE,  WORD  e  LONG.  Esse  indi¬ 
cano  tutte  quantità  con  segno  (positivo  o 
negativo)  con  la  convenzione  che 
WORD  indica  un  intero  a  16  bit,  BYTE 
a  8  bit  e  LONG  un  intero  a  32  bit. 
Spiego  brevemente  l’uso:  se  in  un  pro¬ 
gramma  ho  bisogno  della  variabile  intera 
a  16  bit  chiamata  “pippo”  posso  dichia¬ 
rare: 

int  pippo; 

infatti,  il  Megamax  C  (che  noi  usiamo) 
utilizza  interi  a  16  bit. 

Se  però  voglio  compilare  lo  stesso  pro¬ 
gramma  con,  ad  esempio,  il  Lattice  C,  il 
programma  potrebbe  (e  sottolineo  PO¬ 
TREBBE)  non  funzionare  perfettamen¬ 
te  poiché  il  Lattice  C  usa  gli  interi  a  32 
bit. 

Se  invece  dichiaro 
WORD  pippo; 

tutto  torna  a  funzionare:  infatti  all’inizio 
del  programma  vi  sarà  la  macro 

#  define  WORD  int 

e  quindi  il  compilatore  Megamax  C,  anzi 
il  preprocessore,  sostituirà  WORD  con 
int  ogni  volta  che  appare. 

Se  invece  uso  il  Lattice  C,  dovrò  usare  la 
macro: 

#  define  WORD  short 

poiché  “short”,  per  il  Lattice  C,  è  una 
quantità  a  16  bit.  Tutto  chiaro  fino  ad 
ora?  Bene,  proseguiamo. 


COMMENTO  Al  PROGRAMMA 

Non  commenteremo  tutto  il  programma 
e  la  teoria  su  cui  si  basa:  per  far  ciò  occo- 
rerebbero  decine  di  pagine.  Spieghere¬ 
mo  le  cose  principali  e  basilari,  le  prime 
cose  da  sapere  sul  GEM. 

La  prima  istruzione  dice  al  compilatore 
di  INCLUDERE  in  quel  punto,  il  file 
OBDEFS.H;  torneremo  un’altra  volta  a 
parlare  di  questo  file.  Per  ora  vi  basti 
sapere  che  nel  file  sono  contenute  defini¬ 
zioni  di  “oggetti”  del  GEM:  da  qui  il  no¬ 
me  OBject  DEFinitionS. 

Qualche  riga  dopo  vi  è  una  dichiarazione 
“extern”  che  deve  essere  SEMPRE  pre¬ 
sente  nei  vostri  programmi.  Seguono  poi 
le  dichiarazioni  di  alcune  variabili  e  di  7 
array.  Gli  array  denominati  “contri  intin 
ptsin  intout  ptsout”,  devono  essere 
SEMPRE  presenti  nei  vostri  programmi 
che  sfruttano  il  GEM  altrimenti  il  vostro 
linker  si  arrabbierà  non  poco.  Tutte  le 
comunicazioni  con  il  VDI  avvengono  tra¬ 
mite  questi  array  ed  il  VDI  si  aspetta  di 
trovarli  nel  vostro  programma. 

Le  variabili  chiamate  “handle”  e  “gem- 
-handle”  sono  2  “HANDLE”:  sono  cioè 
due  identificatori  che  indicano  al  GEM 
su  che  dispositivo  sta  scrivendo  o  dise¬ 
gnando.  Il  VDI,  cioè  la  parte  del  GEM 


WORD  i , pxy C43 ; 

gem_handle  =  graf_handle(  hi  ,  hi  ,  hi 
handle=gem_handl e; 

,  ?<i 

/« 

)  If 

vdi  handle 

«/ 

far (  i =0  ;  i < 1 0  ;  wor k_i nC ì ++1  =  1  ) 

; 

/% 

riempie  1 ’ array 

«/ 

wor  k _ i  n  C  1 0  U  =2  ; 

/% 

coordinate  raster 

#/ 

v_opnvwk (work_in, &handle, work_out) ; 

if  (  handle  ==  0  ) 

|r*  ja 4-  |  IK-  n  cpp n D  a 

/  « 

errore  in  v  opnvwk 

«/ 

I  ctui  II  E-  IN  i  \  LJ  l\  «t 

return  OK; 


> 


/**********************************************************************/ 
/«  main  :  qui  inizia  l’esecuzione  */ 

/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 


VOID 
mai n  (  ) 


WORD  livello; 

/% 

livello  ì  nifi  àìTzzàz  i  one 

«/ 

if  (!<  livello  »  iniziaO)) 

/% 

0  ==  nessun  errore 

*/ 

programma ( ) ; 

/% 

esegui  programma 

«/ 

termina(livello) ; 

71 

termina  secondo  ^livello’ 

*/ 

y 


/% - 

- */ 

/  *  -  -  - . - . . . . . . . .  . . . .  *  / 

#def i ne 

MAGIC 

0x8765432 IL 

#def i ne 
#def i ne 

VIRGIN 

I LEA VE 

OxE5E5 

1 

#def i ne 
#def i ne 

NOLOAD 

RANDOM 

0 

Ox 1 0000 GOL 

#def i ne 
#def i ne 

BOOTSECT 

FAT1SECT 

1 

2 

#def i ne 

FAT2SECT 

TC'Ap  L-*’ 

7 

#def ine 
#def i ne 

SI  DEC 

0 

/« - */ 

/«  routines  per  manipolare  gli  oggetti  */ 
/« - «/ 


/* - */ 

/«  do_obj  «/ 

/* - «/ 

VOID 


dc_ob  j 
OBJECT 

(tree,  obj,  bit) 

«tree; 

/«  setta  il 

singolo  bit  in 

ob_state 

«/ 

WORD 

ob j ,  bit; 

(tree+ob j ) ->ob_state 

1 =  bit; 

> 

/* - 

- */ 

/* 

/  * - 

undo_ob j 

«/ 

- «/ 

VOID 

undo^ob j (tree,  obj,  bit) 
OBJECT  «tree; 

/«  cancella 

il  singolo  bit 

in  ob^state 

«/ 

WUKD 

c 

OD  j  ,  D 1 1  ; 

y 

(tree+ob j) ->ob_state 

&=  ""bit  ; 

/* - */ 

/*  sel_obj  «/ 

/% - - - */ 

VOID 

sei _ob j (tree,  obj)  /«  seleziona  l’oggetto  */ 

OBJECT  *tree; 

WORD  obj; 

do_ob j (tree,  obj,  SELECTED) ; 

> 


/«- - - - */ 

/#  desel_obj  •  */ 

/* - 1 - #/ 

VOID 

desei  bb j (tree,  obj)  /*  deseleziona  l’oggetto  «/ 

OBJECT  «tree; 

WORD  obj; 

{ 
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SEZIONE  sr 


WORD 

statep (tree,  obj,  bit) 

OBJECT  ttree; 

WORD  ob  j ; 

WORD  bit; 

< 

return  (  (  (  tree+ob  j  ) ->ob_state  &  bit)  !  *  0)  ; 

> 


/* - */ 

/*  selectp  */ 

/*  controlla  se  un  oggetto  e*  s^le-*/ 

/%  zionato  */ 

/* - */ 

WORD 

sei ectp (tree,  obj) 

OBJECT  «tree; 

WORD  ob  j  ; 

< 

return  statepttree,  obj,  SELECTED)  ; 

> 


VOID 

get_xywh (tree,  obj,x,y,w,h  )  /*  ritorna  x,y,w,h  dell’oggetto  #/ 

OBJECT  Uree; 

WORD  obj; 

WORD  *x , *y, *w, *h; 

objc_off set (tree,  obj,  x,  y)  ; 

*w  =  (tree+ob j ) ->ob_wi dth ; 

#h  =  (tree+ob j ) ->ob_hei ght; 


/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*%%%%%%%/ 
/%  programma ( )  %/ 

/%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%/ 

BYTE  *al ert  =  " C23 C ! Formattaz i one  f al  1 i ta I  Control  1  a  il  discolie  OK  1"; 
BYTE  *alertl  =  " C33 C !  Errore  in  scr i ttur a  I 3 C  OK  3"; 


undo_ob j (tree,  obj,  SELECTED); 

> 


/* - */ 

/*  statep  %/ 

/* - */ 


/  * - * - T - - - */ 

/*  get_xywh  %/ 

/% - */ 


programma ( ) 
i 

WORD  button; 

WORD  devno=0; 

WORD  ret; 

WORD  x,y,w,h; 

WORD  exit_obj; 

WORD  tracce, settori , si  de; 


/%  bottone  uscita  alert  */ 


/%  parametri  per  format  %/ 


che  si  occupa  della  grafica  di  base,  ha  la 
capacità  di  disegnare  sullo  schermo,  sul 
plotter,  su  una  stampante  ecc...  È  neces¬ 
sario  quindi  indicare  al  VDI  su  che  cosa 
deve  disegnare  (il  termine  tecnico  è 
WORKSTATION). 

Quando  apriamo  una  workstation,  in  che 
modo  lo  vedremo  poi,  indichiamo  al 
GEM  (VDI)  su  cosa  vogliamo  disegnare; 
il  GEM  ci  assegnerà  un  numero  chiama¬ 
to  HANDLE  che  dovremo  utilizzare 
ogni  volta  che  vorremo  disegnare,  scrive¬ 
re  e  così  via. 

Questo  numero  nel  nostro  programma,  è 
assegnato  alla  variabile  che,  con  poca 
fantasia,  ho  chiamato  “handle”. 
Gem_handle  è  l’handle  associato  al  de¬ 
sktop. 

Subito  dopo  potete  asservare  la  inizializ- 
zazione  di  vari  array;  questi  definiscono 
il  DIALOG  che  compare  sullo  schermo. 
Il  significato  dei  vari  numeri  che  vedete  è 
troppo  complesso  per  poter  essere  spie¬ 
gato  ora;  sarà  Targomento  di  una  prossi¬ 
ma  puntata. 

Di  seguito  vi  sono  le  routines  iniziaQ, 
termina(),  open_(work)()  e  main(). 
Queste  routines  costituiscono  un  corpo 
unico  e  mostrano  il  modo  corretto  di  ini- 
zializzare  il  GEM,  se  non  usate  le  fine¬ 
stre.  Main()  chiama  inizia();  se  tutto  è 
OK  chiama  la  routine  programma()  e  in 
seguito  chiama  termina(). 

Potete  prendere  di  peso  queste  funzioni 
e  utilizzarle  per  cominciare  a  program¬ 
mare  in  GEM;  non  dovete  far  altro  che 
scrivere  una  funzione  di  nome  program- 
ma()  e  inserirvi  dentro  quello  che  volete. 
La  struttura  di  queste  funzioni  è  molto 
lineare. 

La  funzione  inizia()  chiama  appl_init(); 
questa  funzione  si  preoccupa  di  inizializ- 
zare  correttamente  l’AES;  se  questa  ri¬ 
torna  -1  (cioè  ERROR  dato  che  ho  de¬ 
finito  #define  ERROR  -1)  significa  che 
qualche  cosa  è  andato  storto. 

La  funzione  open_work()  inizializza  il 
VDI  e  apre  una  WORKSTATION,  cioè 
indica  al  GEM  su  che  dispositivo  deve 
scrivere  e  disegnare,  in  questo  caso  lo 
schermo.  Attenzione,  appl_int()  è  una 
funzione  del  GEM  mentre  open_vwork() 
è  nel  listato  ed  è  composta  di  più  istru¬ 
zioni. 

Descriviamo  brevemente  2  funzioni  che 
probabilmente  non  incontreremo  più: 
format()  e  make_boot(). 

FORMAT (TRACCE,  SETTORI,  SIDE, 
DERNO) 

Questa  funzione  si  occupa  di  formattare 
tutte  le  tracce  del  disco:  vengono  passati 
come  parametri  il  numero  di  tracce,  il 
numero  di  settori  per  traccia,  il  tipo  di 
disco  (singola/doppia  faccia)  e  il  drive  su 
cui  formattare  il  disco.  La  prima  istruzio¬ 
ne  richiede  memoria  al  sistema  operativo 
per  poter  formattare  il  disco.  Se  il  punta¬ 
tore  al  blocco  di  memoria  non  è  nullo, 
cioè  se  vi  è  abbastanza  memoria,  la  fun¬ 
zione  prosegue  formattando  in  sequenza 
tutte  le  tracce.  Questa  operazione  viene 


prepara ( ) ; 

f  orm_center  (tree_addr ,  ?<x ,  8<y,  8<w,  &h); 
f  or m_d i a 1  (0,0,0,0,0,x,y,w,h) ; 
f orm_di al ( 1 , (x+w) /2, (h+y ) /2, 0, 0, x , y, w, h) ; 
f or  (  ;  ;  ) 

graf _mouse (0, OxOL) ;  /%  cambia  in  freccia  %/ 

treel  CF'ROBAR'3  .  ob_width  =  0; 

ob jc_draw (tree_addr , ROOT, MAX_DEPTH, x , y, w, h) ; 
exit_obj  =  f  orm_do  (  tree_addr  ,  0)  0x7FFF  ; 
if  (ex i t_ob j  ==  ESCI  ) 

f orm_di al (2, (x+w) /2, (h+y ) /2, 0, 0, x , y , w, h ) ; 
f  or m_d i al  (3,0,0,0,0,x,y,w,h) ; 
return  ; 

> 

graf _mouse (2, OxOL) ;  /%  cambia  in  ape  %/ 

trova_param (Stracce,  ^settori ,  &side>; 
ret  =  format (tracce, settori , si  de, devno) ; 
if  (  ret  ==  N0_MEM0RY  ) 

f orm_al ert ( 1 E23 [Memori  a  i nsuf f i ci  ente  !  per  formattare3C  ESCI  3"); 
return  ; 

> 

if  (  ret  ==  ERROR  ) 

f orm_al ert ( 1 , al ert  > ; 

el  se 
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eseguita  mediante  una  chiamata  alla  fun¬ 
zione  Flopfmt()  dell’XBIOS. 

Vengono  passati  a  questa  funzione: 

buffi  è  il  puntatore  al  blocco  di  memoria 

richiesta  prima 

filler:  un  LONG  non  usato 

devno:  è  il  numero  del  disk-drive,  0  = 

disco  A,  1  disco  B  ecc... 

settori:  numero  di  settori  per  traccia  (di 

solito  9). 

i  inumerò  della  traccia  (0.. 79, 80, 81) 
0/1:  numero  della  facciata  del  disco 
ILE  A  VE  ùnterleave  factor  (vedi  articolo 
sul  floppy  disk) 

MAGIC  inumerò  “magico”  che  DEVE 
essere  Ox  87654321 L 
VIRGIN  inumerò  con  cui  si  riempiono  i 
settori.  Per  le  prime  due  tracce  è  uguale 
a  0,  poiché  questo  inizializza  propria¬ 
mente  le  FAT  e  la  DIRECTORY.  Per  le 
altre  tracce  è  0xE5E5. 

La  funzione  ritorna  il  valore  0  se  tutto  è 
OK.  Nota  per  gli  accademici  della  cru¬ 
sca:  il  verbo  “ritornare”  per  i  program¬ 
matori  ammette  complemento  oggetto! 
Se  tutte  le  tracce  sono  OK,  viene  rilascia¬ 
ta  la  memoria  e  viene  ritornato  OK,  al¬ 
trimenti  la  funzione  format()  ritorna  ER- 
ROR. 


ret  =  make_boot (tracce, settori , side, devno) ; 
if  (  ret  ==  ERROR  ) 

f òrm_al er t ( 1 , al ert 1 ) ; 

desei _ob j (tree_addr , FORMATTA) ; 


> 


/♦- - */ 

/♦  prepara  il  DIALOG  ♦  / 

/* - */ 


VOID 

prepara ( ) 
C 

WORD  i ; 


for  (1=0;  i<=  NUM_0BJ  ;  i ++  > 
rsrc_obf ix (tree_addr , i ) ; 


treel 

treel 

treel 

treel 

treel 

treel 

treel 

treel 

treel 

treel 

treel 


[TRACCE803 , 
[TRASCESI 3 , 
[TRACCE823 
[FORMATTA3 


[ESCI 

EMAXI 

C DAR IO 

CSETT9 

CSETT10 

CSINGOLA 

[DOPPIA 


ob_spe 

ob_spe 

ob_spe 

ob_spe 

ob_spe 

ob_spe 

ob_spe 

ob_spe 

ob__spe 


str  i  ngsC  81 
stri ngs[93 ; 
stringsC 103  ; 
str i ngsC23 ; 
str i ngs[33 ; 
str i ngsCOI ; 
stri ngsC 1 3  ; 
stringsC43; 
str i ngsC53 ; 
stringsCó3; 
str i ngsC73 ; 


sei _ob  j (tree_addr , SETT9) ; 
sel_obj (tree_addr , SINGOLA) ; 
sei _ob j (tree_addr , TRACCE80) ; 


/♦  inserisce  le  stringhe  ♦  / 


/♦  oggetti  di  default  ♦  / 


MAKL.B00T  (TRACCE,  SETTORI, 
SIDE,  DEVNO) 

Questa  funzione  costruisce  il  Boot_sec- 
tor  (settore  di  boot)  del  disco  e  inizializza 
le  FAT  (File  Allocation  Table).  Non  è 
compito  di  questo  articolo  spiegare  cosa 
è  il  Boot  sector  e  cosa  sono  le  FAT;  vi 
basti  sapere  che  il  boot  sector  è  un  setto¬ 
re  speciale  del  disco  su  cui  sono  scritte 
informazioni  indispensabili  al  corretto 
funzionamento  del  disco:  ad  esempio  il 
numero  di  settori  totali,  il  numero  di  set¬ 
tori  per  traccia  e  il  tipo  di  disco  (singo¬ 
la/doppia  faccia).  Le  FAT  sono  tabelle 
che  permettono  al  sistema  operativo  di 
localizzare  fisicamente  ogni  file  sul  di¬ 
schetto. 

Il  funzionamento  è  semplice:  attraverso 
Protobt()  chiede  al  sistema  operativo  di 
costruire  una  immagine  in  memoria  di  un 
boot  sector  standard;  successivamente 
modifica  questa  immagine  inserendovi  le 
informazioni  relative  al  disco  che  abbia¬ 
mo  precedentemente  formattato  in  mo¬ 
do  non  standard. 

Queste  informazioni  sono  quelle  a  cui 
accennavamo  prima:  numero  di  settori 
totali,  settori  per  traccia  e  tipo  di  disco. 
A  questo  punto  il  boot  sector  viene  scrit¬ 
to  su  disco  con  la  funzione  Flopwr(). 

In  seguito  vengono  inizializzate  le  FAT  e 
viene  rilasciata  la  memoria.  Se  le  opera¬ 
zioni  di  scrittura,  tramite  Flopwr,  sono 
state  effettuate  senza  problemi,  la  fun¬ 
zione  ritorna  OK,  altrimenti  ritorna  ER¬ 
ROR. 

Bene,  per  questo  numero  ci  sembra  più 
che  sufficiente  il  malloppo  che  vi  abbia¬ 
mo  finora  esposto.  Il  listato  che  accom¬ 
pagna  l’articolo  va  battuto  con  molta  cu¬ 
ra,  perchè  spazi,  punti  e  virgola  e  “pipe” 
sono  molto  importanti  negli  “script”  in 


/♦ - */ 

/♦  trova_param  ♦  / 
/♦  trova  il  numero  di  tracce, settori  e  ♦  / 
/♦  il  tipo  di*  formattazione  scelto  ♦  / 
/♦ - */ 


VOID 

trova_param (tracce, settori , si  de) 

WORD  stracce; 

WORD  ♦settori; 

WORD  *side; 

C 

if  (selectp ( tree_addr , TRACCE80) ) 
stracce  =  80; 

if  (sei ectp ( tree_addr , TRACCE81 ) ) 
♦tracce  =  81; 

if  (sei ectp <tree_addr , TRACCE82) ) 
♦tracce  =  82; 


if  (sei ectp (tree_addr , SETT9) ) 
♦settori  =  9; 

el  se 

♦settori  =  10; 


if  (sei ectp (tree_addr , SINGOLA) ) 

♦side  =  0; 

else 

♦side  =  1; 

3- 

/♦ - * - ♦/ 

/♦  set_prog()  ♦/ 

/%  questa  routine  si  occupa  della  barra  che  ♦/ 
/*  Si  riempì©  mano  a  mano  che  si  formatta  */ 

/%  il  disco  ♦/ 

/♦ - */ 


VOID 

set_prog (vaine, maxc) 

WORD  value, maxc; 

C 

WORD  wold, wnew; 

WORD  x,y,w,h; 

wold  =  treel [PR0B0X3 . ob_width  -1;  /♦  lunqhezza  della  barra  ♦/ 

wnew  =  wold  +  1; 
if  (maxc) 

wnew  =  (.(LONG)  value  ♦  (LONG)  wnew)  /maxc  ; 
if  (wnew  <  1) 


wold  =  treel [PROBAR 3 . ob_wi dth; 
treel [PR0BAR3 . ob_width  =  wnew  ; 
if  (  value  ) 
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C.  Buon  lavoro! 


SEZIONE  ST 

c 

get_xywh  (  tree_addr  ,  PROBAR,  &x  ,  Z<y ,  &w,  &h  )  ; 
x  +=  wold  ;  w  =  w-wold+1  ; 

objC_draw(tree_addr, ROOT, MAX_DEF'TH, x  ,  y ,  w,  h  > ; 

} 


z  # - ' - — - - - *  / 

/%  format ()  */ 
/*  formatta  il  disco  */ 
/*  ritorna  ERROR  se  vi  sono  errori  #/ 
/*  e  NO_MEMORY  se  non  vi  e'  sufficiente  %/ 
/*  memoria  per  formattare  */ 
/*— - */ 


WORD 

format (tracce, settori , side, devno) 


WORD 

WORD 

tracce; 
settori  ; 

/♦  numero  tracce 

/♦  settori  per  traccia 

*/ 

*/ 

WORD 

WORD 

side; 

devno; 

/♦  singola/  doppia  faccia 

/♦  drive  A:  o  B: 

*/ 

*/ 

i 

uinpn 

/ %  conta  le  tracci  e 

*/ 

WwrVU 

BYTE 
i  nwr; 

èli 

♦buf  ; 

-fili  er  * 

/%  buffer  per  formattare 

*/ 

LUlMU 

LONG 

succ  =  OL; 

buf  *  Mal  1  oc  (  1 OOOOL  )  ; 

/*  alloca  memoria  buffer 

*/ 
w  / 

if  (bu-f  ==  NULL) 

return  (  NO_MEMORY  > 

; 

/%  poca  memoria 

I  / 

for  ( i =0  ;  i<tracce  ;  i ++> 

/%  formatta  le  traccie 

*/ 

cnrr  +=  FI  nn-fmt  (  bu-f  . 

filler. 

devno.  settori.  i.O, 

I LEA VE, 

MAGIC, i <2  ?  0  :  VIRGIN); 

i-f  (side  !  —  0) 

ì 

1  Br 

/*  lato  1 

*/ 

bUU  L.  1 —  r  X  Tlllt\UUI  J  IAX, 

ILEAVE, 

MAGIC, i <2  ?  0  :  VIRGIN); 

set_prog (i+l,tracce) 

. 

/%  ingrandisci  la  barra 

*/ 

if  (succ) 

Kraal'  • 

/%  se  vi  e’  un  errore  esci 

*/ 

* 

Mf ree (buf ) ; 

/*  rilascia  la  memoria 

*/ 

if  (  succ  ) 

return  (  ERROR  )  ; 

else 

return  (  OK  ) ; 

/* - #/ 

/%  make_boot()  %/ 

/%  costruisce  il  boot  sector  del  disco  %/ 

/%  ritorna  ERROR  se  vi  e'  un  errore  %/ 

/% - - */ 

IBI! 


WORD 

WORD 

tracce; 
settori  ; 

/* 

/* 

numero  di  tracce 
numero  di  settori 

*/ 

WORD 

side; 

/* 

singola  o  doppia  -faccia 

*/ 

WORD 

devno; 

/* 

drive  A:  o  B: 

*/ 

C 

WORD 

tot  sect— set tor i stracce ; 

/* 

totale  settori 

*/ 

BYTE 

♦buf  ; 

/* 

buffer  per  il  boot_sector 

*/ 

WORD 

i  s 

LONG 

filler, succ; 

buf  *  Mal  1  oc (512L) ; 

/*  buffer  per  boot  sect 

*/ 

for (i  «  0;  i  <  512;  * (buf 

5 

+  i++)  =  0) 

/*  azzera  boot  sector 

%/ 

Protobt (buf,  RANDOM,  side  +  2  ,  NOLOAD) ; 

*  (buf  +  0x13)  =  (tot^sect  +  (side  ?  tot_sect  :  0)  >  &  Oxff; 

* (buf  +  0x14)  =  (  (tot_sect  +  (side  ?  tot_sect  :  0) )  >>  8)  &  Oxff; 

*(buf  +  0x18)  *  settori; 

succ  =  FI opwr (buf , f i 1 1 er , devno,  B00TSECT,  TRACKO,  SIDEO,  1); 
f or ( i  *  0;  i  <  512;  * (buf  +  i++>  =  0)  /*  azzera  buffer  %/ 


♦  (buf )  =  Ox  f  7 ; 

♦ (buf  +  1)  =  Oxff; 

/* 

costruisce  le  FAT 

*/ 

* (buf  +2)  =  Oxff; 

succ  +=  FI opwr (buf , f  i  11 er , devno, 

succ  +=  FI opwr (buf , f i 1 1 er , devno, 

FATI SECT, 
FAT2SECT, 

TRACKO,  SIDEO,  1); 
TRACKO,  SIDEO,  1); 

Mf ree (buf ) ; 
i f  ( sue  c ) 

/* 

rilascia  memoria 

*/ 

return  ( 

ERROR  > ; 

/* 

errore  in  flopwr 

*/ 

el  se 

return  ( 

OK  )  ; 

QUANDO  II  GENI  FINI'  IN 
TRIBUNALE 

Fino  all’ottobre  1985  era  il  cavallo  di  bat¬ 
taglia  della  Digital  Research,  la  società 
americana  che  negli  anni  Settanta  era 
riuscita  ad  affermare  in  tutto  il  mondo  il 
CP/M,  il  sistema  operativo  per  i  compu¬ 
ter  dotati  di  microprocessore  Z80,  molto 
diffusi  fino  al  1980,  anno  in  cui  la  IBM 
presentò  il  PC  basato  su  8086.  Impostosi 
come  standard  industriale  e  supportato 
da  migliaia  di  realizzazioni  software,  è 
ancor  oggi  il  più  diffuso  al  mondo  dopo 
l’MS-DOS.  Il  GEM  aveva  le  carte  in  re¬ 
gola  per  sfondare:  facile  da  usare,  poten¬ 
te  e  versatile,  trasformava  qualsiasi  pro¬ 
gramma  di  produttività  personale  sotto 
MS-DOS  in  un  sistema  “user-friendly”, 
semplice  da  imparare  e  molto  più  veloce 
da  utilizzare.  Il  segreto  del  GEM  era 
quello  di  proporsi  come  ambiente  opera¬ 
tivo  a  icone,  simile  a  quello  di  Apple  Ma¬ 
cintosh,  con  un  desktop  principale,  menu 
pull-down,  uso  intensivo  del  mouse  e  del 
linguaggio  simbolico. 

In  ambiente  MS-DOS  il  GEM  aveva 
creato  subito  interesse  non  solo  per  le 
sue  caratteristiche  intrinseche,  ma  anche 
per  i  programmi  che  erano  stati  commer¬ 
cializzati  insieme  al  sistema  operativo. 
La  comparsa  dell’ATARI  ST,  prima  con 
il  520  e  poi  con  il  1040,  aveva  sicuramen¬ 
te  aumentato  le  credenziali  del  GEM, 
che  era  responsabile  del  grande  successo 
commerciale  delle  macchine  ST.  Ed  è 
forse  stato  proprio  questo  sconfinamento 
in  un  settore  considerato  intoccabile  dai 
seguaci  della  mela  a  far  scattare  da  parte 
della  Apple  una  denuncia  contro  la  DRI 
per  violazione  del  copyright  sull’interfac¬ 
cia  a  icone.  I  legali  della  casa  di  Cuperti- 
no,  sostenevano  che  il  GEM  era  un  rifa¬ 
cimento  del  sistema  di  Macintosh,  e  dan¬ 
neggiava  le  vendite  Apple.  Timorosa  di 
imbarcarsi  in  una  costosa  causa  la  Digital 
Research  verso  la  metà  di  settembre  del 
1985  si  impegnò  a  ritirare  dal  mercato 
tutte  le  versioni  del  GEM  in  commercio, 
e  a  modificare  sostanzialmente  l’aspetto 
della  scrivania.  Come  risarcimento  danni 
la  Apple  chiese  una  notevole  somma  di 
denaro  e  la  disponibilità  della  DRI  a  col¬ 
laborare  con  Apple  per  lo  sviluppo  di 
pacchetti  applicativi  su  Macintosh. 

Un  anno  dopo  le  vicende  giudiziarie  del 
GEM,  la  Microsoft  aveva  quasi  termina¬ 
to  il  Beta-test  di  Windows,  il  nuovo  am¬ 
biente  operativo  per  computer  MS-DOS 
che  si  è  oggi  imposto  in  tutto  il  mondo 
come  standard  per  applicazioni  grafiche 
su  PC.  In  effetti  Windows  non  presenta 
vantaggi  rilevanti  rispetto  al  GEM  De¬ 
sktop,  e  inizialmente  ha  offerto  al  pub¬ 
blico  programmi  comparabili  come  pre¬ 
stazioni  al  Paint  e  al  Write  della  DRI. 
Tuttavia,  la  fortuna  di  Windows  è  legata 
al  nome  e  alla  forza  commerciale  della 
Microsoft,  oggi  leader  nel  software  per 
PC  IBM  e  compatibili. 
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cercaclinica.  Indispensabile  nella  rapida 
diffusione  di  strumenti  informatici  nella 
medicina,  sia  negli  ospedali  che  negli 
ambienti  universitari. 


genza  artificiale,  qual’è  lo  stato  attuale 
della  ricerca,  quali  le  sue  realizzazioni  e 
le  sue  prospettive.  Un  testo  base  per  la 
disciplina  del  futuro. 


ilTuo  Libro. 
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UN 

PROGRAMMA 
PER  LA 

REALIZZAZIONE 
DI  IMMAGINI  IN 
MOVIMENTO 
INCREDIBIL¬ 
MENTE 
SEMPLICE  DA 
USARE.  L'IDEALE 
PER  CHI  SI 
VUOLE  TUFFARE 
NELLE 

ANIMAZIONI 
SENZA  PERDERE 
TEMPO  SU 
VOLUMINOSI 
MANUALI. 


DI  PAOLO  GALVANI 


AECIS 

ANIMATOR: 

ANIMAZIONE 

FACILE 


Preparare  una  sequenza  di  immagini 
in  movimento  non  è  mai  stata  cosa 
troppo  facile  ed  i  migliori  pro¬ 
grammi  del  genere  si  sono  spesso  rivelati 
così  complicati  da  scoraggiare  presto  an¬ 
che  il  più  incallito  degli  appassionati.  Nu¬ 
merosi  comandi,  lunghe  sequenze  da  me¬ 
morizzare  e  il  tempo  da  dedicarvi  consi¬ 
gliavano  di  rivolgersi  ai  videogiochi. 
Oggi  è  arrivato  Aegis  Animator,  un  pro¬ 
gramma  di  animazione  che  rende  addirit¬ 
tura  superfluo  il  manuale  di  istruzioni. 
Tutti  i  comandi  sono  ben  chiari  e  ordinati 
nei  soliti  menu  pull-down  cosicché  la 
creazione  di  sequenze  diventa  elementa¬ 
re.  Paradossalmente  la  cosa  più  difficile 
non  è  preparare  la  sequenza  delle  imma¬ 
gini,  ma  crearle.  Non  è  certo  più  difficile 
che  disegnare  con  un  comune  program¬ 
ma  di  paint,  ma  questo  vi  può  dare  Pidea 
di  quanto  sia  facile  lavorare  con  Aegis 
Animator.  Il  programma  occupa  in  me¬ 
moria  poco  più  di  100K  lasciano  così  am¬ 


pio  spazio  alle  nostre  elaborazioni.  Alla 
schermata  iniziale  il  video  si  presenta 
completamente  nero  con  i  menu  pull- 
down  nella  barra  superiore  e  il  fast  menu 
in  alto  a  sinistra.  Questo  è  un  menu  che 
può  essere  visualizzato  o  meno,  conte¬ 
nente  le  funzioni  più  semplici  che  posso¬ 
no  essere  selezionate  senza  “tirare  giù”  il 
menu  a  discesa. 

“Project”  è  il  menu  di  base,  quello  con 
cui  si  inizia  la  preparazione  delle  immagi¬ 
ni.  Qui  troviamo  “New  script”,  che  con¬ 
sente  di  passare  ad  un’altra  immagine,  e 
“Storage”,  che  accede  al  drive  per  carica¬ 
re  sequenze  già  memorizzate.  Importan¬ 
tissima  l’opzione  “Color”,  tramite  la 
quale  possiamo  modificare  a  piacimento 
la  tavolozza  di  colori  originale  variando 
luminosità  e  saturazione  di  ognuno  dei 
trentadue  colori  disponibili  in  bassa  riso¬ 
luzione.  Sempre  in  questa  opzione  tro¬ 
viamo  i  comandi  per  selezionare  un  ran- 
ge  di  colori  e  il  comando  “Cycle”  per 
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ottenere  il  rapido  e  continuo  cambia¬ 
mento  dei  colori  della  nostra  immagine. 
Sempre  nel  menu  “Project”  abbiamo 
“Undo”,  “Fast  menu”  (per  visualizzarlo 
o  farlo  sparire),  “Storyboard”  (per  vede¬ 
re  contemporaneamente  e  spostarsi  nelle 
nove  pagine  grafiche  di  Aegis  Anima- 
tor),  “Time”  (per  regolare  la  velocità  del 
movimento  delle  immagini)  e  “Status” 
(che  indica  la  memoria  a  disposizione). 


CREARE  UN  OGGETTO 

La  creazione  di  un  oggetto  avviene  in 
modo  molto  semplice.  Il  menu  “Create” 
contiene  una  serie  di  oggetti  già  pronti  da 
utilizzare,  ovvero  linee,  poligoni  (da  co¬ 
struirsi  manualmente  o  già  pronti  a  quat¬ 
tro  lati),  cerchi  e  stelle.  I  cerchi,  le  linee 
e  i  poligoni  da  costruire  possono  essere 
visualizzati  “pieni”,  cioè  colorati,  oppure 
semplicemente  con  le  linee  esterne.  Que¬ 


sti  due  modi  di  visualizzazione  fornisco¬ 
no  un’ampia  versatilità  al  programma. 
Per  stabilire  le  dimensioni  degli  oggetti  ci 
si  sposta,  partendo  dal  centro  della  figu¬ 
ra,  verso  l’esterno  finché  l’oggetto  non 
avrà  raggiunto  le  dimensioni  desiderate. 
Con  l’opzione  “Clone”  è  possibile  dupli¬ 
care  uno  qualsiasi  degli  oggetti  presenti 
sullo  schermo  e  con  “Destroy”  cancel¬ 
larlo. 


Il  MOVIMENTO 

Creare  il  movimento  di  un  oggetto  è  mol¬ 
to  semplice  grazie  ai  menu  “Move”  e 
“Select”.  Possiamo  scegliere  tra  due  di¬ 
versi  modi  di  procedere:  creare  tutti  gli 
oggetti  e  poi  muoverli  singolarmente  o  a 
gruppi,  oppure  animare  le  figure  mano  a 
mano  che  le  costruiamo. 

Ognuno  di  voi  adotterà  naturalmente  il 
metodo  che  gli  sembrerà  più  comodo. 


Prima  di  preparare  l’animazione  bisogna 
selezionare  la  figura  da  muovere.  Trami¬ 
te  il  menu  “Select”  possiamo  scegliere  un 
punto,  tutti  i  punti  presenti  sullo  scher¬ 
mo,  un  segmento,  tutti  i  segmenti,  un 
poligono,  tutti  i  poligoni  oppure  tutti  gli 
oggetti  della  pagina  grafica. 

Una  volta  effettuata  la  selezione  si  deci¬ 
de  che  tipo  di  movimento  dovrà  fare  l’og¬ 
getto.  Possiamo  spostarlo  orizzontal¬ 
mente  (sideways),  portarlo  dal  centro 
dello  schermo  verso  il  bordo  (out)  e  vice¬ 
versa  (in),  ruotarlo  in  piano  (piane),  sul¬ 
l’asse  x  e  sull’asse  y,  modificarne  le  di¬ 
mensioni,  creare  un  percorso  sul  quale 
muoverlo  (path),  cambiarne  il  colore 
(change  color),  cambiarlo  da  colorato  a 
vuoto  e  viceversa  (change  type)  e  cam¬ 
biarne  la  forma  (morph). 

Tutto  questo  in  maniera  molto  semplice, 
solamente  selezionando  l’opzione  desi¬ 
derata  e  portandoci  sull’oggetto  che 
muoveremo  con  il  mouse  “agganciando¬ 
lo”  con  un  uncino  che  appare  al  posto  del 
cursore. 

RIVEDERE  UNA  SEQUENZA 

Per  rivedere  una  sequenza  creata  utiliz¬ 
zeremo  il  menu  “Time”.  Con  “Replay 
tween”  possiamo  far  partire  la  sequenza 
del  movimento  di  una  sola  figura,  con 
“Replay  all”  rivediamo  il  filmate)  com¬ 
pleto.  Comoda  e  spesso  utile  e  “Play 
loop”  che  fa  ripartire  la  sequenza  ogni 
volta  che  giunge  alla  fine. 

In  “Ghost  mode”  tutti  gli  oggetti  sullo 
schermo  diventano  trasparenti,  in'modo 
da  studiare  meglio  i  movimenti  det  singo¬ 
li  oggetti  nel  contesto  globale. 

CONCLUSIONI 

È  veramente  incredibile  la  semplicità 
d’uso  di  questo  programma  che  permette 
di  ottenere  risultati  finali  che  non  man¬ 
cheranno  di  stupire  i  vostri  amici.  La  co¬ 
sa  che  più  si  può  imputare  a  Aegis  Ani- 
mator  è  la  mancanza  di  precisione.  I  mo¬ 
vimenti  vengono  creati  a  occhio,  e  se 
questo  riduce  di  molto  le  difficoltà  è  vero 
anche  che  in  molti  casi  la  precisione  è 
essenziale.  Ma  del  resto  questo  program¬ 
ma  si  rivolge  a  chi  vuole  “smanettare”  un 
po’  con  Atari,  non  certo  a  chi  ci  deve 
lavorare. 

Insomma,  chi  si  vuole  divertire  con  ani¬ 
mazioni  create  in  proprio,  e  con  risultati 
niente  male,  senza  ricorrere  ad  appro¬ 
fonditi  studi,  deve  rivolgersi  ad  Aegis 
Animator,  il  programma  per  l’animazio¬ 
ne  facile. 


Programma:  Aegis  Animator 

Produttore:  Aegis  Development 

Distributore:  per  ora  non  distribuito  in  Italia, 

viene  venduto  in  Svizzera 

Computer:  Atari  serie  ST,  monitor  a  colori 

Prezzo:  circa  160  Franchi  Svizzeri  (170.000 

lire) 
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LISTATI 


SPAZIO  BASIC  UN  PROGRAMMA  IN 

ATARI  BASIC  PER 
PRODURRE  GRAFICI  DI 
TUTTI  I  GENERI  CON  IL 
520  IN  ALTA 
RISOLUZIONE 


DI  MARCHIO  MORCHIO 


Dopo  aver  portato  a  casa  il  “bestio¬ 
ne”  era  assolutamente  necessario 
tirarci  fuori  qualcosa  di  utile,  se 
non  altro  per  non  fare  temere  a  chi  ha 
pagato  (genitori  nel  mio  e  nel  rimanente 
70%  dei  casi)  di  aver  speso  inutilmente  i 
propri  soldi. 

Domanda:  cosa  si  adatta  meglio  a  mo¬ 
strare  la  possanza  di  un  520? 

Risposta:  un  programma  di  grafica,  ma¬ 
gari  utile,  oltre  che  bello. 


Ed  ecco  BUSIGRAF. 

Il  programma  permette  la  memorizzazio¬ 
ne  di  sei  (o  più)  classi  di  dati,  le  quali 
possono  essere  rappresentate  mediante 
diagrammi  a  torta,  istogrammi  (orizzon¬ 
tali,  verticali,  multipli,  sovrapposti),  dia¬ 
grammi  cartesiani,  anche  multipli,  e  dia¬ 
grammi  ad  aree,  naturalmente  potendo 
sovrapporre  più  diagrammi  (istogram¬ 
mi  -I- aree  e  istogrammi -1- cartesiani).  I  da¬ 
ti  possono  poi  essere  manipolati  in  vari 
modi:  si  possono  ordinare  alfabetica¬ 
mente  e  numericamente,  in  ordine  cre¬ 
scente  e  decrescente.  Si  possono  infine 
memorizzare  e  caricare  da  disco  files 
contenenti  singole  classi  e  cancellarli 
quando  non  ci  sono  più  utili.  Una  grande 
varietà  di  operazioni  quindi,  ma  di  facile 
impiego,  essendo  tutto  basato  su  una 
struttura  di  menu  che  guida  l’utente  du¬ 
rante  tutte  le  operazioni.  Lo  scaling  è 
completamente  automatizzato  come  an¬ 
che  l’introduzione  di  legende  esplicative 
dei  grafici. 

BUSIGRAF  IN  PRATICA 


Al  RUN  appare  l’INPUT  MENU,  che 
dà  accesso  evidentemente  alle  operazioni 
di  inserimento  dati.  Per  cominciare  a  la¬ 
vorare  è  naturalmente  necessario  inseri¬ 
re  dei  dati  da  rappresentare:  chiamiamo 
quindi  l’opzione  [1]  ”Nuova  classe”.  Im¬ 
messo  il  nome  che  si  vuole  dare  alla  serie 
di  dati  (che  sarà  quello  che  apparirà  nel- 


terce«t»»U 


1000  rem  _ _ 

1010  rem  1  INIZIALIZZAZIONE  ! 

1020  rem  - : - 

1030  c 1 ea r : c 1  a s s i “5  : p i  =  3 .  1 4 1 592  : cp u%~c 1  a s s i + 1  : f u 1 1 w  2 
1040  option  base  0  :  ori  error  goto  6060 

1050  dim  va(23,classi+1),el em%(  class i  +  1)  , com$(  23,classi+1)  , nome$(  classi) 

1060  dim  ev$( 23, classi) 

1070  for  n=0  to  classi :for  j=0  to  23 

1080  va( j , n) =0  : com$(  j , n) =  "*" : ev$( j , n) *"  " :next 

1090  e  1  em%(  n)  *”0  :  nome$(  n)""#":next 

1100  f r$""\xxxxxxxx\  ######  .  ##  "  :  f  r  1  "  ##)  " 

1110  cu%~0 : nc 1%= 1 : openw  2,0,18,690,440 

1120  x%=0:y%-0:i%-640: j%»440: color  1<0, 1,1,1 

1130  SEZTN : 

1140  rem  _  _ 

1150  rem  I  INPUT  MENU  I 

1 1 60  rem  - 

1170  gosub  ALLW2 : got oxy  0,0:?"  *****  BUSUGRAF  ****":? 

1180  ? " I N P U T  MENU: 1)  NUOVA  CLASSE  DATI" 

1190  ? "[ 2]  AGGIUNGI  DATI" 

1200  ?"[3)  CORREGGI  DAT I " ; t ab( 35) ; " [ 4]  CANCELLA  CLASSE" 

1210  ?"[S]  OUTPUT  NUMERICO" 

1220  ?"[ 6]  OUTPUT  MENU":?"[7]  UTILITY":? 

1230  ?"classi  usate  : "  :  if  cu%  =  0  then  ? " -Ne s s u na - " :  ?  : go t o  1260 
1240  for  n  =  0  to  cu%- 1  : ?n  +  1  ; " : " ; nome$( n)  ; "  :next:?:? 

1250  fl%~0 

1260  ?"èosa  scégli  ?";: gosub  ASKNUM 

1270  on  a%  gosub  NUOVA , AGGIUNGI , CORREGGI , CANCMEM , NUMSTAMP 

1280  if  a%*6  then  goto  SEZ0UT 

1290  if  a%=7  then  goto  T00LS 

1300  gosub  ALLW2 : g o t  o  SEZIN 

1310  NUOVA: 

1320  rem  _ 

1330  rem  {  nuova  classe  dati  I 

1340  rem  - - - *  —  - - 

1350  if  cu%>classi  then  ?:?"non  ci  sono  piu'  classi  disponibili"  :  return 
1360  input  "nome  nuova  classe" ; n$ 

1  370  nome$(  cu%)  *»n$:cl%=*cu%:cu%”:cu%+1 
1380  da%=0 : gosub  RIEMPIMENTO 

1390  return 
14GD  AGGIUNGI; 

1410  rem  _ 

1420  rem  I  aggiunta  dati  a  classe  | 

1430  rem  - 

1440  if  cu%=0  then  ?  :  ? "non  sono  state  ancora  definite  classi" ;  return 
1450  gosub  ASKCLASS:if  cl%=-1  then  return 

1460  da%-e 1 em%( c 1%)  : if  da%>23  then  ?:?"clesse  già'  piena" :  return 
1470  gosub  RIEMPIMENTO 
1480  return 
1490  CORREGGI: 

1  500  rem  _ .  ■ . _ . 

1510  rem  I  correzione  dati  | 

1520  rem  - 

1530  if  cu%=0  then  ?:?"non  sono  state  ancora  definire  classi"  :  return 
1540  gosub  ASKCLASS : if  cl%-**-1  then  return 

1550  fl%-1: gosub  NUMSTAMP1 

1560  gotoxy  0,  16  :  input.  "quale  modifico  (  x  -r e t )  " ; r$ : a%~ va  1 ( r$1 
1570  gotoxy  0,16:?  spc( 70) 

1580  if  r$»"x"  or  r$~"X"  then  return 

1590  gotoxy  0 ,  1 6  : ?a%; ")  " ;  :  input  "de nomi na z ione , v a  1 ore " ; com$( a% , c 1%)  , va( a% , c 1 %) 
1600  line  input  "*  ^evidenzia  L  RETURN]  ^normale  "  ;  r$ 

1610  if  r $ < > " * "  then  r$--"  " 

1620  ev$( a%,cl%) ~r$: gosub  STAMPAA 

1630  gotoxy  0,16:?  spc(70):?  spc( 70)  :  ?  spc( 70)  :  goto  1560 
1640  CANCMEM: 

1650  rem  _ 

1660  rem  I  cancella  da  mem  | 

1670  rem  - 1 - 

1680  ? "CANCELLAZIONE  IN  MEMORIA :": gosub  ASKCLASS:if  cl%--1  then  return 

1690  for  n~cl%+1  to  c 1  a s s i :  e  1 em%( n - 1 ) ~e 1 cm%( n) 

1700  for  j«0  to  23  : v a( j , n- 1 ) * va( j , n)  : com$( j , n- 1 ) -com$(  j , n)  :  e v$( j , n- 1 ) -e v$( j , n) 
1710  next  :nome$(  n-1)  =^nome$(  n)  :next  :  c  u%--c  u%  -  1  :e  1  em%(  classi)  =0 
1720  return 
1730  NUMSTAMP: 

1740  rem  _ 

1750  rem  I  output  numerico  j 

1760  rem  - 

1770  if  cu%jm0  then  ?;?"non  sono  stati  memorizzati  dati"  :  return 
1780  gosub  ASKCLASS;if  clS&'-l  then  return 
1790  NUMSTAMP 1  : 

1800  gosub  ALLW2:gotoxy  0,0:?"nome  c 1  a s se  : " ;  nome $( c 1 %) 

1810  for  o%~G  to  e  1 em%( c 1 %) - 1  : gosub  STAMPAA;next 
1820  if  fl%-0  t ben  a%-inp(2) 

1830  return 
1840  RIEMPIMENTO: 

1850  rem _ _ 

1860  rem  I  riempi  classe  cl%  a  partire  da  do%  1 

1870  rem  - 

1880  gosub  ALLW2 : gotoxy  0,0:fl%»1 

1890  gosub  NUMSTAMP 1 

1900  gotoxy  0 ,  1 6  :  ? " n . " ; da% ; " : " ; 

1910  input  "denominazione, valere  ( 0 , 0~e x i t ) " ; com$( da%,c 1%) , va( da% , c 1%) 

1920  if  com$(  da%fd%)  -"0"  then,  goto  1980 

1930  line  input  .2'^  “evidenzia  [RETURN]  -.normale  "  ;  r$ 

1940  if  r  $<>”*"  then  r$“"  " 

1950  evSt  da%, cl%) ~r$ : a%“da%: gosub  STAMPAA 

1960  gotoxy  0,16:?  spc(70):?  spc  (70):?  spc  (70) 

1  970  da%--da%+  1  :  if  da%<24  t  he  n  goto  1  9Q0 

1980  e lem%( c 1%) =da% :  re t urn 


l’output),  si  passa  all’input  vero  e  pro¬ 
prio.  Per  ogni  voce  occorre  inserire  pri¬ 
ma  la  definizione  e,  separato  da  una  vir¬ 
gola,  il  valore  numerico  corrispondente. 
Alla  fine  dei  dati  inserire  “0,0”  per  co¬ 
municare  al  programma  di  tornare  al  me¬ 
nu.  Se  a  questo  punto  ci  accorgiamo  di 
avere  commesso  errori  nell’immissione, 
si  può  passare  al  modo  CORREZIONE, 
opzione  [3]  del  menù,  o,  se  si  vogliono 
aggiungere  altre  voci,  al  modo  AG¬ 
GIUNGI  (opzione  [2]).  Se  poi  vogliamo 
produrre  un  tabulato  con  i  dati  numerici, 
ecco  l’opzione  [5].  Passiamo  ora  alla  par¬ 
te  centrale  del  programma:  l’OUTPUT 
MENU,  attraverso  l’opzione  [6]  del  me¬ 
nu  input. 

Le  possibilità  che  ci  si  offrono  a  questo 
punto  sono  piuttosto  varie.  Analizziamo¬ 
le  con  ordine:  rispondiamo  [1]  all’input 
e,  dopo  avere  inserito  il  nome  o  il  nume¬ 
ro  della  classe  su  cui  si  intende  lavorare, 
ecco  apparire  un  diagramma  a  torta  rap¬ 
presentante  i  nostri  dati,  espressi  qui  in 
forma  di  percentuale.  Volendo  eviden¬ 
ziarne  alcuni,  separando  uno  o  più  spic¬ 
chi  del  diagramma,  si  deve  inserire  du¬ 
rante  l’input  un  asterisco  alla  domanda 
“evidenzio  il  dato?”. 

Rispondendo  [2]  all’output  menu,  si  ac¬ 
cede  alla  tracciatura  di  istogrammi  verti¬ 
cali.  Il  programma  chiede  quante  classi 
di  dati  si  vogliono  rappresentare  e  con 
che  tipo  di  istogrammi  (affiancati  o  so¬ 
vrapposti).  Se  vogliamo  rappresentare 
una  sola  classe  possiamo  rispondere 
[RETURN]  all’ultima  domanda.  È  quin¬ 
di  necessario  comunicare  al  programma 
quali  classi  rappresentare  (come  ho  detto 
il  programma  accetta  sia  il  nome  che  il 
numero  di  identificazione),  e  in  che  ordi¬ 
ne,  concludendo  con  la  distanza  (in  pi- 
xels)  alla  quale  andranno  posti  i  gruppi  di 
barre.  Chiedere  questo  dato  può  sembra¬ 
re  un’inutile  complicazione  rispetto  al 
chiedere  direttamente  la  larghezza  delle 
barre,  ma  in  realtà  ciò  risulta  più  como¬ 
do,  per  l’utente  e  per  il  programma.  In 
questo  modo  se  vogliamo  che  le  barre 
siano  tutte  unite  basterà  rispondere  “O” 
all’input,  invece  di  calcolare  per  tentativi 
la  larghezza  necessaria.  Inserito  il  codice 
della  retinatura  desiderata  per  il  disegno, 
ecco  apparire  il  nostro  istogramma,  con 
tanto  di  legenda  esplicativa  in  fondo  alla 
finestra.  A  proposito:  se  non  lo  aveste 
ancora  notato,  il  programma  cancella  la 
Menu  Bar  in  cima  allo  schermo  e  i  bordi 
della  Output  Window,  permettendo  di 
riprodurre  i  grafici  su  stampante  (con 
ALTERNATE -I- HELP,  per  chi  ancora 
non  lo  sapesse)  senza  portarsi  dietro  il 
marchio  del  Basic. 

Premendo  un  tasto  si  torna  all’Output 
Menu.  L’alternativa  che  segue  permette 
la  stampa  di  un  istogramma  orizzontale. 
Il  procedimento  è  simile  al  precedente,  a 
parte  il  fatto  che  in  orizzontale  è  possibi¬ 
le  rappresentare  una  sola  classe  per 
volta. 
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L’opzione  [4]  permette  la  rappresenta¬ 
zione  di  diagrammi  cartesiani. 

Possono  essere  rappresentate  più  classi 
contemporaneamente  e  il  procedimento 
è  uguale  a  quello  usato  nella  tracciatura 
di  istogrammi  multipli.  L’unica  differen¬ 
za  è  che  al  posto  della  distanza  tra  le  bar¬ 
re  è  chiesta  la  larghezza  del  tratto.  Il  gra¬ 
fico  rappresenta  le  linee  egualmente  lar¬ 
ghe  e  distingue  una  classe  dall’altra  attra¬ 
verso  la  retinatura  dei  cerchi  disegnati  a 
intervalli  regolari  sui  segmenti. 

L’ultima  opzione  di  disegno  “singolo”, 
ovvero  con  un  solo  tipo  di  grafico,  è  la 
[5].  Essa  permette  la  tracciatura  di  dia¬ 
grammi  ad  aree.  Il  processo  di  input  è 
sempre  il  solito,  ma  qui  occorre  segnala¬ 
re  che,  proprio  perchè  i  dati  sono  rappre¬ 
sentati  nello  stesso  ordine  col  quale  sono 
inseriti,  è  consigliabile  in  questo  caso  in¬ 
serire  per  prime  le  classi  che  abbiano  una 
media  di  valori  alta,  per  evitare  interse¬ 
zioni  e  sovrapposizioni  errate  delle  linee 
che  formano  la  campitura  delle  aree.  In¬ 
fatti  in  questo  caso  la  superficie  non  è 
riempita  con  le  normali  retinature  del 
GEM,  ma  con  linee  a  diverse  distanze. 
Si  passa  infine  alle  opzioni  di  disegno 
“misto”:  la  [6]  rappresenta  uno  o  più 
istogrammi  verticali  con  sullo  sfondo  un 
diagramma  ad  aree;  la  [7]  rappresenta 
uno  o  più  istogrammi  ai  quali  è  sovrap¬ 
posta  la  linea  di  un  diagramma  cartesia¬ 
no.  In  entrambi  i  casi,  durante  l’inseri¬ 
mento  dei  nomi  delle  classi  da  rappresen¬ 
tare,  si  viene  avvertiti  che  la  classe  inseri¬ 
ta  per  prima  sarà  visualizzata  con  un  dia¬ 
gramma  ad  aree  o  cartesiano. 

Ricordo  una  cosa  che  può  sembrare  ov¬ 
via:  in  tutti  i  casi  in  cui  si  effettuano  trac¬ 
ciamenti  multipli  (sia  di  un  solo  tipo  che 
misti)  è  necessario  che  il  numero  dei  va¬ 
lori  delle  varie  classi  da  rappresentare  sia 
lo  stesso  e  che  la  descrizione  dei  valori 
coincida.  In  caso  la  descrizione  differi¬ 
sca,  è  visualizzata  solo  quella  della  prima 
classe  inserita. 

Le  opzioni  restanti  sono  funzioni  di  ser¬ 
vizio,  che  permettono  di  spostarsi  agli 
altri  menu:  con  la  [8]  si  torna  all’Input 
Menu,  con  la  [9]  si  accede  all’Utility 
Menu. 

Nell’Utility  Menu  le  opzioni  sono  piutto¬ 
sto  semplici:  si  possono  ordinare  i  dati  di 
ogni  classe  in  senso  crescente  o  decre¬ 
scente;  si  possono  ordinare  le  descrizioni 
di  ogni  dato  alfabeticamente  (anche  qui  è 
presente  la  funzione  inversa),  e  si  può 
infine  accedere  all’ultimo  menu:  il  menu 
I/O  DISK,  che  permette  appunto  la  me¬ 
morizzazione,  il  caricamento  in  memoria 
e  la  cancellazione  di  files  contenenti 
ognuno  una  classe.  Il  programma  ricono¬ 
sce  solo  files  generati  da  lui  stesso  o  nello 
stesso  formato,  e  aventi  l’estensione 
‘DAT’,  che  viene  aggiunta  automatica- 
mente  in  fase  di  registrazione  e  di  carica¬ 
mento  e  non  deve  essere  quindi  inserita 
da  tastiera. 


1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
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2120 
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2140 
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2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
25  10 
2520 
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2660 
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2710 

2720 

2730 

2740 

2750 

2760 

2770 

2780 
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2800 

2810 
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2840 

2850 

2860 

2870 

2880 

2890 

2900 

2910 
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2930 

2940 

2950 

2951 
2960 


STAMPAA : 

rem  _ _ 

rem  |  stampa  item  a%  in  posizione  I 

rem  - - 

if  a%<  1  2  then  x%=Q:y%=2  +  a%  else  x%=20 : y%-a%- 1 0 
gotoxy  x%,y%:n=ro% 

?using  f ri  $  ; n ;  :  ?  using  fr$; com$( n , cl%)  ; va( n , cl%)  ;ev$(n,cl%)  :return 
ASKCLASS : 

rem  _ _ _ 

rem  |  out :  classe  da  usare  in  cl%  | 

rem  - - 

input  "su  quale  classe  vuoi  operare  n$  :  c  1%**-  1 

if  vol( n$) >0  and  val(n$)<-cu%  then  c 1 %” va  1 ( n$) - 1  :  re t urn 

for  j=0  to  cu%-1:if  n$~nome$( j)  then  cl%=j:j~cu% 

nextrif  clS&^-l  then  ?"  classe  inesistente"  :  return 

return 

ASKNUM : 

rem  _ 

rem  |  input  1  numero  I 

rem  - - 

a%**inp(2):if  a%<48  or  a%>57  then  goto  2170 
o%-a%-48  i  7  "  <  "  ;  o%;  "  >  "  :  r$~  s  t  r$(  a)  .-return 
SEZ0UT : 


rem  - - - - 

rem  |  OUTPUT  MENU  | 

rem  - 

gosub  ALLW2:  gotoxy  0,0:?"  ****  BUSIGRAF  ****"  ;  ? 

? "OUTPUT  MENU:":?:? 

?"[ 1]  DIAGRAMMA  A  TORTA" 

? " [ 2 ]  ISTOGRAMMI  VERTICALI" 

? " [ 3 ]  ISTOGRAMMA  ORIZZONTALE" 

? "[ 4]  DIAGRAMMI  CARTESIANI" 

? "[ 5]  DIAGRAMMI  AD  AREE" 

? "[ 6]  AREE+IST0GRAMM1 " ; tab( 30) ; "[ 7]  CART . + IST0GRAMM I " 

?"[8]  INPUT  MENU" :?"[ 9]  UTILITY":? 

?"classi  usate  :  "  :  if  cu%^0  then  ? " -Ne s suna- " :  ?  : go t o  2360 
for  n*-0  to  cu%-  1  :  ? n  +  1  ;  "  :  "  ;  nome $(  n )  ;  "  "  ;  :  next  :  ? 

?"cosa  scegli  ?";: gosub  ASKNUM 
if  a%-3  then  r$-,"or" 
if  a% -9  then  goto  T00LS 
if  a%~8  then  goto  SEZIN 
xo%~2 : y a%~40 : yb%-380 : xb%~610 

on  a%  gosub  AREOGRAMMI , IST0MULT , BARRE , CARTEMULT , AREE , MISTO  1  , MIST02 
goto  SEZ0UT 

rem  >>>>>>>>>  ,xa%,ya%  ■-  coordinate  finestra  output  <<<<<<<<<< 

rem  >>>>>>>>>  xb%,yb%  *  coords  f.o.  basso  destra  <<<<<<<<<< 
ARLOGRAMMI : 


rem  _ 

rem  |  aerogrammi  ! 

rem  - 

gosub  ASKCLASS:if  cl%i-1  then  return 
poke  systab+24,1 


x%-x a% : y%~y a% : i%=xb% : j%~yb% :  col  or  1 , 0 ,  1 ,  1  ,  1  : gosub  VBAR:gosub  VRtìOX 
xc%-xa%+(  xb%-xa%)  /4:yc%=ya%+(  yb%-ya%)  /2-33:rg%=(  xb%-xa%)  /4-4 
tot=0:for  n=*0  to  e  1  em%(  c  1  %)  -  1  :  t  o  t  - 1  ot  +  va(  n  ,  c  1  %)  :  ne  x  t 
an  =  0 

for  n  =  0  to  e  1 em%( c 1%) - 1  : x%~xc% : y%- yc% 
an1-va(n,ci*) ^3600/ tot 

if  e v$( n , c 1%) = then  ag=( an^pi / 1 800) +  ( an 1 *pi / 1 800) /2 : x%=x%+1 0*cos 
( ag) : y%=y%- 1 O^sinC ag) 

color  1 ,  1 ,  1 , n+ 1 , 2  : pcircle  x%, y%, rg%, on , an  +  en 1 
an  =  an  +  an 1 :next 

t  est  o$^ nome $C  c  1%)  :  x%-xa%+(  xb%-xo%)  / 2-8* len(  testo$)  /  2:  y%=*ya%+  1  6 
gosub  TEXT 

yc%-ya%+48 : xc%~xa%+(  xb%-xa%) /2 : f or  n  =  0  to  elem%(  cl%) -  1 
x%-xc%: y%-yc%:  i%-x%+12 : j%~y%- 1 2  :  col  or  1  ,  1 ,  1  , n+1 , 2  : gosub  VBAR 
ma x ~ v a( 0 , c 1 %)  : max$“com$(  0 , c 1%) 

pc%~  1  0  0  *  v  a  (  n  ,  c  1%)  /  tot  :  t  e  s  t  o$  =  com$(  n  ,  cl%)  +"  "  +  str$(  pc%) +"  %" 


x%=x%+13: gosub  TEXT 
yc%=y c%+( y b%-y a%) / 1 3  : if  n=11 
next : poke  systab+24,0 
a%=inp(  2)  :  return 
BARRE  : 


then  xc%=xc%+( xb%-xa%) /4 : yc%=ya%+48 


rem  _ 

rem  |  istogrammi  | 

rem  - 

gosub  ASKCLASS:if  cl%^-1  then  return 

input  "ette  distanza  pongo  tra  i  blocchifin  pixels)  "  ;dist% 
input "retinatura(  1-24)";col% 
poke  systab+24,1 
gosub  AXESDAT 

largh%  =  ( bxw%-( elem%( cl%) *dist%) ) /elem%(  cl%) 

if  r$  =  "or"  then  largh%™( byh%-(  elem%(  cl%) *dist%) ) /elem%(  el%) 
di%=:dist%+largh%:  incr%=lorgh%+2  :  gosub  AXES 
SUBBARRE  : 

rem  >>>  TRACCIATURA  BOX  <<< 

color  1,1,1, col%, 2 

for  n  =  0  to  elem%(cl%)-1 

y%=yc%-va(  n , c 1 %) *by h%/ ma x  :  x%=xc%+n*di%+5:  i%=x%+largh%:  j%«yc%-5 

if  r$  =  "or "  then  x%=xc%  +  5 : y%=yc%-(  n+ 1 ) *di%-5 : i%=x%+ va(  n , c 1%) *bxw%/max : 

j%=y%+ 1 argh% 

gosub  VBAR 

next 

t  e  s  t  o$=nome$(  c  1%)  :x%=Txa%+(  xb%-xa%)  /  2-8*len(  testo$)/2:y%~yb%-16 

if  ncl%<>1  then  x%*xaX+(  (  xb%-xo%)./ncl%+  10)  *  j 

if  f 1 2  then  x%= xa%+C ( xb%-xa%) / ( nc 1%+ 1 )  +  1 0) * j 

i%-x%+ 12  : j%=y%+12 : gosub  VBAR : y%- j%: x%~i%+2 : gosub  TEXT 

pokesystab+24,0 

if  ncl%<>1  then  return 

if  ncl%<> 1  then  return 

a%r=inpC2)  return 


52 


•  «lì  liceo  Scienti 


di  complessità. 


abbiamo  duo 


Se  abbiamo  dei  dati  che 
rappresentano  lo 
svolgersi  di  un 
fenomeno  nel  tempo,  il 
grafico  più  adatte  è  » 

Se  poi  i  dati  sono 
multipli,  tanto  meglio: 
c'è  il  diagramma 
cartesiano  multiplo. 


2970  AXESDAT : 

2980  rem  _ _ _ _ _ 

2990  rem  |  disegno  ossi  quotati  | 

3000  rem  - 

3010  rem  >>>  CALCOLO  COORDINATE  ASSI  E  DIMENSIONI  <<< 

3020  max  -  va(  0  ,  c  1%)  :  mox$=-com$(  0  ,  cl%) 

3030  for  n=  1  to  e  1  em%(  c  1%)  -  1  :  i f  vaf  n  ,  c  1  %)  >ma  x  -t  hen  ma  x  =  va(  n  ,  c  1  %) 

3040  if  len(com$(n,cl%))>len(max$)  then  max$  =  com$(  n , c 1%) 

3050  next : s 1%=len(  str$( max) ) *12+ 1  : s2%=len( max$) *9+18 

3060  xc%=x a%+  s 1  %  : y c%=y b%- s2% : bxw%=xb%-xc%- 1 0  : by h%=  y c%— y a%- 1 0 

3070  if  r$= "or"  then  xc%=xa%+s2% : yc%=yb%-s 1% 

3080  bxw%=xb%-xcX-10 : byh%=yc%-ya%- 1 0 
3090  return 
3100  AXES : 

3110  rem  >>>  TRACCI ATUTR A  ASSI  <<< 

3120  poke  systab  +  24 , 0  :  input "Intestazione  ";inte$:poke  systab  +  24,  1  :gosub  ALLW2 
3130  x%  =  xa%: y%=ya%: i%=xb%: j%=yb%: color  1 , 0 ,  1 ,  1  ,  1  : gosub  VBAR : gosub  VRB0X 
3140  i%~0: JX-1 : gosub  ESTREMI 

3150  linef  x c%- 1 0+ xaX , yc%-y o% , xcX+b x w%+x a% , y c%-y a% 

3160  linef  xc%+xa% , yc%+ 1 0— ya%, xcX+xaX, yc%-byh%— ya% 

3170  j5t="0:gosub  ESTREMI  :  i%~6haaaa  :  gosub  LINDEF 

3180  tp%-max/7:if  tp%-0  then  tp%=1 

3190  i%=0-2700*( r$-"orM) : gosub  BASEL INE 

3200  for  a%--tp%  to  max  step  t  p%  :  y%=yc%-(  a%*by  h%/mox)  +5  :  x%=xc%-s  1  %+5 
3210  if  r$="or"  then  y%=yc% : x%^xc%+C a%*bxw%/max) +5 
3220  testo$=str$( a%) : gosub  TEXT 

3230  if  r  $  <  > " o  r "  then  linef  xc%+x a% , y%-ya% , xc%+ x a%+b x w% , y%-y a% 

3240  if  ^-"or"  then  ldnef  x%-x a , y c%-y a% , x% , y c%-y o%-by h% 

3250  next 

3260  i%-2700+2700<( r$-"or”) : gosub  BASEL 1 NE 

3270  for  n  =  0  to  elem%( cl%) - 1  : x%-xc%+n*di%+incr% : y%-yc% 

3280  if  r$~"or”  then  x%~ xaX+5 : y%=yc%-n*di%-i ncr% 

3290  tc sto$~com$( n , c 1%) : gosub  TEXT 

3300  if  r$<>"or"  then  linef  x%+xa%, yc%-ya%, x%+xa%, yc%-ya%-byh% 

3310  if  r$-"or”  then  linef  xc%+ xa% , y%- ya% , xc%+ xa%+b x w% , y %-ya% 

3320  next 

3325  i%-0:gosub  BASEL1NE : i%~ 1  : gosub  SFTTYPE: 

3330  x%= 10  : y%-20 : testo$-inte$ : gosub  TEXT 

3335  return 


fi  PROGRAMMA 

Passiamo  ora  sinteticamente  ad  esamina¬ 
re  il  programma  BASIC  di  Busigraf,  che 
sarà  analizzato  approfonditamente  nel¬ 
l’apposito  spazio  (REMarks). 

Scorrendo  rapidamente  il  listato  si  nota 
che  il  programma  è  composto  da  una  se¬ 
rie  di  piccole  routines  che  si  chiamano  a 
vicenda:  da  quelle  di  alto  livello,  che  ge¬ 
stiscono  i  vari  menu,  a  quelle  di  livello 
più  infimo,  che  svolgono  compiti  ele¬ 
mentari  come  chiedere  ‘Su  quale  classe 
vuoi  operare?’  e  comunicare  il  dato  al 
programma  principale.  Che  non  esiste. 
Mi  rendo  conto  che  sto  seminando  il  pa¬ 
nico  con  questa  mia  ultima  affermazione; 
vediamo  di  spiegare:  un  effettivo  MAIN 
PROGRAM,  che  dovrebbe  gestire  un 
ipotetico  MAIN  MENU,  non  esiste  per¬ 
chè  l’esecuzione  parte  subito  coll’INPUT 
MENU,  che  è  necessariamente  la  prima 
tappa  per  lavorare  con  Busigraf.  Gli  altri 
menu  sono  chiamati  da  apposite  opzioni 
dell’input  menu,  che  viene  chiamato  a 
sua  volta  dagli  altri  quando  necessita.  I 
tre  menu  principali  quindi  (Input,  Ou- 
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tput.  Utility)  sono  esattamente  sullo  stes¬ 
so  piano,  proprio  come  i  quattro  Desk, 
File,  View,  Options  del  GEM. 

Questa  configurazione  a  scatole  cinesi, 
insieme  all’abbondanza  di  REM,  rende  il 
programma  molto  più  comprensibile  e 
flessibile,  anche  grazie  alla  possibilità  of¬ 
ferta  dal  BASIC  Atari  di  etichettare  con 
nomi  mnemonici  i  numeri  di  linea,  evi¬ 
tando  errori  derivati  da  spostamenti  di 
routines  o  riorganizzazioni  del  program¬ 
ma  in  fase  di  creazione,  e  permettendo  a 
chiunque  di  apportare  modifiche  al  lista¬ 
to  secondo  le  proprie  esigenze.  Basterà 
infatti  aggiungere  una  voce  al  menù  uti¬ 
lity  e  una  breve  routine  in  coda  al  pro¬ 
gramma  per  permettere  ad  esempio,  di 
calcolare  una  nuova  classe  di  dati  ope¬ 
rando  sui  valori  delle  precedenti,  crean¬ 
do  una  specie  di  rozzo  spread  data  sheet 
con  rappresentazione  grafica  dei  dati. 
Non  avrà  bisogno  di  questa  opzione  chi 
deve  rappresentare  dati  già  esistenti  (stu¬ 
denti  alle  prese  con  ricerche  a  cui  dare 
una  veste  un  po’  curata),  mentre  chi  dal¬ 
le  spese  e  dai  guadagni  vuole  ottenere  il 
grafico  del  ricavo  potrà  utilmente  avva¬ 
lersene. 

N.B. 

Un’ultima  nota:  se,  dopo  avere  definito 
una  classe  di  dati,  vedete  apparire  nei 
grafici,  tra  i  nomi  o  tra  i  valori  numerici, 
degli  strani  caratteri  o  numeri  pazzeschi, 
non  prendetevela  con  Busigraf,  ma  con  i 
progettisti  del  Basic  Atari,  che  ogni  tanto 
cambia  dei  valori  nelle  matrici  di  una  cer¬ 
ta  dimensione,  almeno  nella  versione  in 
mio  possesso  (la  prima). 

REMarks 

1000-1120:  Inizializzazione  delle  variabili 
‘globali’  (descritte  nell’apposito  riqua¬ 
dro);  si  stabilisce  anche  di  saltare  alla 
routine  6060  in  caso  di  errore  e  si  apre  la 
Output  Window  del  BASIC  oltre  i  limiti 
dello  schermo,  per  eliminare  tutti  i  suoi 
accessori. 

1130-1300  (SEZIN):  input  menu.  Vengo¬ 
no  rappresentate  le  opzioni  ed  eseguite 
le  scelte  dell’utente.  Notare  la  chiamata 
“gosub  ALLW2”,  che  cancella  dallo 
schermo  tutti  gli  accessori  della  Output 
Window  e  la  chiamata  alla  routine 
ASKNUM,  che  accetta  una  cifra  in  IN¬ 
PUT. 

1310-1390  (NUOVA):  prima  opzione 
dell’input  menu.  Viene  definita  una  nuo¬ 
va  classe  di  dati.  La  routine  NUOVA  si 
occupa  comunque  solo  di  chiedere  il  no¬ 
me  della  nuova  classe.  Il  riempimento  è 
affidato  alla  routine  RIEMPIMENTO. 
1400-1480  (AGGIUNGI):  aggiunta  di 
dati  alla  classe  indicata.  Anche  questa 
routine  chiama  RIEMPIMENTO  che, 
come  vedremo,  accetta  vari  input  a  se¬ 
conda  della  funzione  che  deve  svolgere. 
1490-1630  (CORREZIONE):  chiede 
nell’ordine  il  nome  della  classe  e,  visua- 


3340 

33B0 

3360 

3370 

3380 

3390 

3400 

3410 

3420 

3430 

3440 

3450 

3460 

3470 

3480 

3490 

3500 

3510 

3530 
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3850 

3560 

3570 

3590 

3590 
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3630 

3640 

3650 
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3670 

3680 

3690 

3700 
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3720 
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3740 

3750 

3760 

3770 

3780 

3790 

3800 

38  1  0 

3820 

3830 

3840 

3850 

3860 

3870 

3880 

3890 

3900 

3910 

3920 

3930 

3940 

3950 

3960 

3970 

3980 

3990 

4000 

4010 

4020 

4030 

4040 

4050 

4060 

4070 

4080 

4090 

4100 

4  110 

4120 
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SUBCARTE  : 

rem  _ 

rem  I  diagrammi  cartesiani  f 

rem  - 

i%~ i argh% : gosub  SE  IWIDTH :  coi  or  1,1,  1  ,  c  a  1  % ,  2 
i%-~2  :  j%~2  :  gosub  E  STREMI 

x%,=  xo%+xà%  +  'incr%:  y%=s  yc%-  va(  e  ,  c  1  %)  *b  y  h%/  ma  x-y  a% 

:Lf  e  v  $C  0  ,  c  1  %)  ~  "  *"  then  pei  relè  x  %  ,  y  %  ,  1  a  rg  h%+  1  0 
f  or  n=l  t  o  e  lem%(  c  L%)  -  ì 

y 1%-yc%-va(  n , e  1 %) *byh%/max  ~ya% : x 1 %~xc%+  n ” d i%+ incr%  +  xa% 

1 i  ne f  v%,  y%,  *  1%,  y1% 

pcirclc  x%,  y%,  largh%  +  3:.if  c  v  $(  n  ,  c  1%)  -  "  •*"  then  pcirele  x  1  %  ,  y  1  % ,  1  or  gl  >  +  1  0 
r.%- x  1  %  :  y  %•  y  1  %  ;  nex.  t 

pei  re  1 c  x%, y%,  lùrgb%+3: i%-0: j%~0: gosub  ESTREMI  : i%~ 1  : gosub  SETWTDTH 

test  o$~nome$f  rl% )  :  x%-xa%+(  xb%-xo%)  /2-B*len(  tasto$)/2:  y%-yb%-4 

if  ncl%  :>1  then  x% •* xo%+(  (  xb%-xa%)  / nc  1%+  1  0)  #  J 

if  fl%-§  then  x%- xa%  +  (  C  xb%-,xa%J /(  ngI%+U  +  10)  ;:'J 

pei  relè  x%+>-.a%, y%-ya%-3, 5  : x%- x%  + 10  : gosub  TE XT 

return 

IST0MIJ1  T  : 

pem  _  _ _ _ _ _ 

rem  !  istogrammi  multipli  | 

rem  - - - 

if  cu%=0  then  ?” non  ho  dati  in  memoria": return 
gosub  ALL  W2  : go  t  ox  >  t  0,0:  ?"--->  ISTOGRAMMA  MULTIPLO 
input  "Affiancati  o  Sovrapposti  (a/s)";r$ 
if  r$=-  "  s  "  or  r$~”S"  then  goto  SOVRAPPOSTI 
gosub  MULTIGEN : if  ncl%>cu%  then  nclK-1 :  return 

input  "distanza  .tra  i  gruppi  di  bari' e  (in  p i x e  1 s ) " ; d i s t %  :  co  1 %= 0 
poKc  systab+24,1 

1 argh%-( b x w%-( elem%( c%( 0) ) *dist%) ) /(  elem%( c%(  0))»ncl%) 
d i 1  a  r gh%*nc 1%+di s t% : incr%~la  rgh%*nc 1%/ 2 
gosub  AXES  :  d  i  s  t  %~  I  or  gh%:;(  nc  1%  -  1  )  +  d  j  s  t  % 

TSTOMULTSUB : 
poke  systab+24,1 

x  c%~ x c %  -  1  a r g h %  : f  o  r  j ~  0  tu  nel %  -  1 

c l%=c%( j) : xc%=xc%+ 1 argh% : col%=col%+ 1 

gosub  SUBBARRE  :  ne x t 
poke  systab+24,0 
if  f 1 %~2  then  return 

erase  c%:ncl%;-1:a%:=;inp(2)  :return 
CARTEMULT : 

rem _ 

rem  t  cartesiani  multipli  I 

rem  - 

if  cu%~0  then  ?"non  ho  dati  in  memoria" :return 

gosub  ALLW2 : go t ox y  0,0:?" - >  CARTESIANI  MULTIPLI:":?:? 

gosub  MULTIGEN:if  ncl%>cu%  then  nc 1 1  :  re t ur n 
di%”bxw%/el em%( c%( 0) ) : col%=0 : incr%=5 
input "larghezza  del  tratto  ( 1-20)";largh% 
poke  systab+24,1 
gosub  AXES:incr%~5 

for  j “0  to  ncl%- 1  : c l%~c%( j)  : col%~col%+ 1 

gosub  SUBCARTE  : next : erase  c% : nc 1%= 1 

poke  sysiab+24,0 

a%“inp(  2)  .-return 

MULTIGEN : 

rem 

rem  I  sub.  generica  calcolo  dati  per  tracciamenti  multipli  I 

rem  - 

input "quante  classi  vuoi  rappresentare  " ; n  c 1 %  :  ?  :  ? " classi  usate:” 
for  n  =  0  to  cu%- 1  : ?n+ 1  ; " ; " ; nome$( n)  ; "  ";;next:?;? 

if  ncl%>c.u%  then  ?"non  esistono  "  ;ncl%;  "  classi  in  memor  .i  a  "  :  re  t  urn 
option  base  0:dim  c%(ncl%-1) 

if  fl%~2  then  ?"-Il  dato  '1'  sarà'  rappresentato  con  un  diagramma  ";x$ 
for  n-~0  to  ncl%-1 

?n+1 gosub  ASKCLASS : if  cl%"~1  then  goto  4000 
c%( n) *c  1  %  : next 

rem  >>>>  trova  classe  inox  <<<< 
mpx^OMnx^O:  tp%^0 

for  n~0  to  ncl%-1:for  j^0  t. o  elem%(n)-1 
if  va(  j  ,  c%(  n)  )  >max  then  max  *=va(  j  ,  c%(  n)  ) 
next 

if  max>mx  then  mx— max  : tp%- n 
next 

swap  c%(  tp%)  ,  c%(  0) 
cl%~c%(0)  .-gosub  AXESDAT 
swap  c%(  tp%)  ,  c%(  0) 
return 

SOVRAPPOSTI  : 

rem  _ 

rem  I  istogrammi  sovrapposti  I 

rem  - 

input "quante  classi  vuoi  utilizzare";ncl% 

if  ncl%>cu%  then  ?"non  sono  state  definite  abbastanza  classi" :  return 
option  base  0:dim  c%(ncl%-1) 

?:?" classi  usate: ”:for  n  =  0  to  cu%-1 :?n+1 ; " : " ; nome$( n)  ;  "  ";:next:?:? 
for  n~0  to  nc  1%- 1  :  ?n  + 1  gosub  ASKCLASS:if  cl%,r-1  then  goto  4210 

c%(  n  )  ~c  1  %  :  n  e  x  t 

rem  >>>>>>>>  MATRICE  SOMMA  <<<<<<<<<< 

max--0:for  n=-0  to  ncl%-1:if  e  1  em%(  c%(  n)  )  >max  then  inax’e  lem%(  c%(  n)  ) 

ne x t :  e  1 em%( cp u%J *ma x : for  n-0  to  max- 1  ; va( n , cpu%) =0  : nex t 

for  n=0  to  ncl%-1:for  j=0  to  max 

va( j,cpu%) rva( j,cpu%) +va( j,c%( n)  ) :next:next 

for  n~0  to  max- 1  : com${ n , cpu%) ~com$(  n , c%(  0) ): next 

c l%™cpu% : gosub  AXESDAT 

input "distanza  barre  " ; d i s  t  % 

for  n^0  to  e lem%( cpu%) -  1  : va( n , cpu%) ^0  : nex t 
largh%~(  bxw%-(  elem%(  cpu%)  *-dist%)  }  /elem%(  cpu%) 
di%~largh%+dist%: incr%~ largh%/2 : gosub  AXES 
rem  >>>>>>>>  TRACCIATURA  <<<<<<<<<< 
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4350  poke  sy s fc ab+24 , 1 

4360  for  j-~0  to  nc  1%- 1  :  color  + 

4370  for  n^O  to  e  1 em%(  c%(  j ) )  -  1 

4380  y%~  y  c%-(  v  a(  n,c%(  j)  )  +  va(  n  ,  cpu%)  )  #b  y h%/ ma  x -5  :  lorgh%+dist%)  +5 

4390  i%^x%+lorgh%:  j%=,yc%-va(  n  ,  cpu%)  *byh%/max-5  :  gosub  VBAR 

4400  va( n,cpu%)^vo( n,cpu%) +va( n  ,  c%( j)) :next 

4410  testo$~nome$( c%( j  ) ) :y%~yb%-16: x%=xa%+( ( x  b%- x  a  3 / nc 1%+ 1 0) * J 

4420  i%~x%+12: j%~y%+12:gosub  VBAR : y%=j% : x%=i%+2 : gosub  TEXT 

4430  next :e rase  c%:ncl%T!1 

4440  poke  systab+24,0 

4450  a%=inp( 2)  :return 

4460  ARFE: 

4470  rem  _ 

4480  rem  I  diagrammi  ad  aree  I 

4490  rem  - ’ - 

4500  gosub  ALLW2: gotoxy  0,0:?” -->  Diagrammi  ad  aree:” 

4510  gosub  MULT IGEN : if  nel%>cu%  then  nc 1 %-0 : r e t ur n 
4520  poke  s.ystab  +  24,1 

4530  d  i%^b  x  w/C/e  1  em%(  c%(  0)  )  :  ine  r%~  5  :  go  s  ub  AXES 

4540  for  j=0  to  ncl%-1 

4550  cl%-c%( J) : gosub  AREESUB 

4560  next:poke  systab+24,0 

4570  ncl%- 1  :  erose'  c% 

4580  a%~inp(23  :return 

4590  AREESUB: 

4600  rem  _ 

4610  rem  t  traccia  la  classe  cl%  | 

4620  rem  - 

4630  for  n~0  to  e  1  emr%(  c  i%) -2 

4640  x%~n*-di%+xc.%+  xa%+  incr%  :x1%~(  n+1)'?,‘di%+xc%+xa%+incr% 

4650  y%=yc%- va(  n  ,  c  1%)  *b y h%/ma x - y a%  :  yi%»yc%-ya%- va(  n+  1  ,  c  1%)  *byh%/ma?f 

4660  a%~y%-y 1  %  : b%~  x 1 %- x% : t  p%“0 : if  (n  mod  2) -0  then  tp%-1 

4670  for  k  - 1  p%  to  b%  step  j  +  2 
4680  linef  x%+k , yc%-ya%, x%+k , y%-a%*k/b% 

4690  next 
4700  next 

47  1  0  t  e  s  t  o$’noffle$(  c  1%)  :  x%~xa%+(  (  xb%-xa%) / ncl%X*J : y %=yb%-ya%- 1 6 

4720  if  flX«2  then  x%«xa%+( ( xb%-xa%) /{ nc 1%+ 1 ) ) *nc IX 

4730  for  k~x%  to  x%+12  step  j+2:linef  k , y% , k , y%+ 1 2  : nex t 

4740  x%~x%  +  20-xa% : y%  =  y%  +  ya%+ 1 0  : gosub  TEXT 

4750  return 

4760  M I STO  1  : 

4770  rem  _ 

4780  rem  I  aree+i stogramma  | 

4790  rem  ~  - - 

4800  gosub  ALLW2: gotoxy  0,0:?" - >  Ar e e + I s t ogr ammi : " 

4810  f 1%“2 : x$-”od  Area." 

4820  gosub  MULTIGEN : if  ncl%>cu%  then  return 
4830  input  "Distanza  tra  i  gruppi  di  t»arrc";d,igt% 

4840  poke  systab+24,1 

4850  largire  bxw%-(  elem%(  c%(  0)  3  *dist%3  3  /(  elem%(  c%(  03  3  *C  ncl%-1)  3 
4860  incr%“largh%-;f(  ncl%-13  /2:di%^largh%i!-(.  ncl%-13  +  dist% 

4870  gosub  AXES  :  d  i  s  t  1  ar gh%';  (  nc  1%- 1  )  +d i  s  t  % 

4880  c 1%  ~c%{ 0}  : j~ 1  : gosub  AREESUB : nel%“ncl%- 1 
4890  fcr  n  ~0  to  ncl%-  1  :  c%C  n3  ^c%(  n+  1  3  :  riex  l 
4900  co  1 K “0  : gosub  IST0MULTSUB 

4910  fl%-0:poko  systab+24,0: erose  c%:nbl%~1 
4920  a%- inp{  2)  :  re t uro 

4930  MIST02: 

4940  rem  _ 

4950  rem  |  ca r t e + i s t og ramm i  | 

4960  rem  - 

4970  gosub  ALI  W2  :  gotoxy  0,0:?” >Car  t  e  s  :lano+ 1  s  t  ogrammi  :  " 

4980  f  1  %  ~  2  : x  $  =  " Cartesiano. " 

4990  gosub  MULTIGEN: if  n  c  1  %  >  c  u  %  then  return 
5000  swap  c%( 0)  , c%(  ncl%-1j 

5010  input  "Distanza  tra  i  gruppi  di  barre" ;dist% 

5020  poke  systab  +  24,  1 

5030  largh%-(  bxw%-(  elem%(  c%(  03  3  ::dist%3  3  /(  elem%(  c%(  0)  3  *(  ncl%-13  ) 

5040  incr%‘  largh%*(  nc  1%- 1  )  / 2  :  di%-*  1  argh%*(  ncl%-13  +dist% 

5050  gosub  AXE S : x s%~ x c% : y s%~ y c% 

5060  ncl%~ncl%- 1  : col%-0 : gosub  TSTOMULTGUB :  Si  % - co 1  f+  1 
5070  xcX- x  s% : y c%  y  s% 

5080  cì%-  c%l.  nc  1%)  :  j~ncl%:  largh%-3:  gosub  SUBCARTE 
5090  erose  c%  :  nc  i  %-  1  :  f  !%-•  0 
5100  a^C^inpf.?)  :  ret  urn 
5110  TOOL  S : 

5  1 20  r  et»  _ _ _ 

5130  rem  I  T  0  0  L  S  MENU! 

51 40  rem 

5  150  gosub  ALLW2:  gotoxy  0,0:?”  ■&■$■“<■»-  BUSIGRAF  »#*■*" 

5160  ?  :  ?"  UT  IL  I I  V  MENU:":? 

5170  ?"[ 1J  S0RT  NUMERICO" ,"[ 2]  S0RT  NUMERICO  INVERSO"  ( 

5180  ? " t  3 ]  S0RT  ALFABETICO" . "[ 4]  S0RT  ALFABETICO  INVERSO" 

5190  ? " [ 5 J  OPERAZIONI  1/0  COL  DISCO" 

5200  ?"{  b]  OUTPUT  MENU";^L?}  INPUT  MENU" 

5210  ?  :  ? " e  ì  a  s  s i  utilizzate: ":if  cu%=0  then  ? "-Nessuna-" :  goto  5230 

5220  for  n=-0  t  o  &a%-  1  :  ?n  +  1  ;  "  :  "  ;  nome$(  n)  ;  "  ";:next:? 

5230  ?:?"cosa  scegli  ?"  ;  :  gosub  ASKNIJM 
5240  a  %  ~  a  % - 3 

5250  if  a%> -3  and  a%<2  then  a%~  1 
5260  if  a%-3  then  SEZ0UT 
5270  if  a%~4  then  SEZIN 
520°  on  a  Si  gosub  S0RT  ,  DISCO 
5290  goto  T00LS 
5300  S0RT: 

5310  rem  _ 

5320  rem  |  ordinamenti  I 
5330  rem  - 

5340  gosub  ASKCLASS:if  cl%~-1  then  return 


lizzatala,  il  numero  del  dato  da  modifica¬ 
re  al  suo  interno.  Appare  per  la  prima 
volta  una  chiamata  alla  routine  STAM- 
PAA.  Il  suo  compito  è  minimo,  ma  verrà 
dopo. 

1640-1720  (CANCMEM):  cancella  una 
classe  dalla  memoria.  La  cancellazione  in 
realtà  si  riduce  al  decremento  di  una  uni¬ 
tà  della  variabile  cu%  che  è  il  numero 
delle  classi  attualmente  definite. 
1730-1830  (NUMSTAMP):  stampa  sul 
video  i  dati  numerici  della  classe  indica¬ 
ta.  Notare  che  oltre  al  principale  NUM¬ 
STAMP,  la  routine  ha  un  altro  ingresso: 
NUMSTAMP1.  Esso  semplicemente  sal¬ 
ta  l’input  della  linea  1780  (che  guarda 
caso  è  una  chiamata  ad  una  subroutine, 
ASKCLASS)  ed  è  usato  dalla  routine... 
1840-1980  (RIEMPIMENTO):  eccola  fi¬ 
nalmente.  Essa  svolge  (lo  si  era  già  capi¬ 
to)  il  compito  di  riempire  la  classe  cl%  a 
partire  dal  dato  da%,  stampando  anche 
tutti  i  valori  precedentemente  definiti. 
1990-2050  (STAMPA A):  ecco  un’altra 
vecchia  conoscenza.  Come  detto  prima 
stampa  il  dato  a%  della  classe  cl%  nella 
sua  posizione  nella  lista.  Notare  il  ricorso 
allo  statement  PRINT  USING  per  inco¬ 
lonnare  i  valori.  A  proposito:  avevate 
notato  che  mettendo  in  un  programma 
PRINT  USING  N  dove  N=0,  si 

ottiene  -0  e  che  PRINT  USING  “##  / 
xxxxx  /  ##.#”;  n;  x$;  a  (che  dovrebbe 
stampare  un  numero,  una  stringa  di  cin¬ 
que  caratteri  e  un  altro  numero)  sempli¬ 
cemente  non  funziona? 

2060-2140  (ASKCLASS):  altra  routine 
usatissima;  chiede  il  numero  o  il  nome 
della  classe  da  utilizzare,  il  cui  numero 
torna  in  Cl%.  Se  il  valore  inserito  è  fuori 
dal  range  delle  classi  definite  torna 
cl%  =  — 1. 

2150-2200  (ASKNUM):  attende  che  ven¬ 
ga  inserito  un  numero  dalla  tastiera,  sen¬ 
za  aspettare  la  pressione  di  [RETURN]. 
Viene  utilizzata  l’istruzione 

“a%  =  INP(2)”,  che  attende  la  pressione 
di  un  tasto  e  pone  in  a%  il  codice  ASCII 
del  tasto  premuto. 

2210-2420  (SEZOUT):  eccoci  al  secondo 
menu  operativo,  l’OUTPUT  MENU, 
che  gestisce  l’accesso  alle  routine  grafi¬ 
che.  Notare  che  nel  caso  il  tasto  premuto 
sia  [3],  istogramma  orizzontale,  viene 
posta  r$=“or”,  avvertendo  così  la  routi¬ 
ne  degli  istogrammi,  che  è  una  sola,  che 
il  grafico  va  sviluppato  in  orizzontale. 
2450-2690  (AREOGRAMMI):  prima 
routine  grafica,  corrispondente  all’opzio¬ 
ne  [1]  dell’output  menu.  Viene  liberato 
sul  video  lo  spazio  necessario  e  contorna¬ 
to  da  un  box  a  spigoli  arrotondati  (2510) 
e  sono  calcolate  le  coordinate  del  centro 
della  circonferenza  (2520)  in  modo  tale 
che  sia  al  centro  della  metà  di  sinistra 
della  output  window.  Si  occupa  della 
tracciatura  il  loop  2550-2590.  Al  suo  in¬ 
terno  la  variabile  ‘ani’  assume  il  valore 
in  centesimi  di  grado  dell’angolo  corri- 
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spondente  al  dato  desiderato  e  ‘an’,  sem¬ 
pre  in  centesimi  di  grado,  l’angolo  già 
tracciato  .‘an’  viene  così  incrementata  ad 
ogni  giro  del  valore  ‘ani’  (2590),  che 
prenderà  il  valore  corrispondente  al  dato 
successivo;  la  linea  2570  si  occupa  di  spo¬ 
stare  il  centro  dello  spicchio  se  il  dato  va 
evidenziato. 

Si  occupa  della  tracciatura  effettiva  la 
potente  istruzione  PCIRCLE  (2580). 
Sempre  all’interno  del  loop  si  stampa  la 
legenda.  Viene  tracciato  un  quadratino 
campito  come  lo  spicchio  corrispondente 
e  a  fianco  il  nome  del  dato,  con  la  su¬ 
broutine  TEXT,  che  vedremo  alla  fine. 
Si  noti  che  durante  questa  e  tutte  le  altre 
routine  grafiche  si  esegue  POKE 
systab-l-24,  1  che  accelera  l’esecuzione 
delle  istruzioni  grafiche,  disabilitando 
però  ogni  INPUT  da  tastiera,  che  viene 
riabilitato  con  POKE  systab+24,0. 
2700-2960  (BARRE):  questa  routine  ha 
due  ingressi:  questo,  e  quello  alla  linea 
2820,  SUBBARRE,  che  in  effetti  è  il  più 
usato.  Questo  perchè  dalla  linea  2700 
parte  una  routine  di  inserimento  dati  che 
viene  usata  solo  per  tracciare  istogrammi 


proporzione  che  dal  valore  del  dato  rica¬ 
va  l’altezza  delle  barre  è  alla  linea  2860, 
seguita  dalla  sua  equivalente  per  gli  isto¬ 
grammi  orizzontali  (2870  if  r$=“or”...). 
Anche  in  questo  caso  sono  stampati  il 
quadratino  con  la  retinatura  e  il  nome 
della  classe  corrispondente.  Le  coordina¬ 
te  di  stampa  vengono  calcolate  alle  linee 
2900-2920  insieme  alla  stringa  con  il  no¬ 
me  della  classe. 

2970-3090  (AXESDAT):  ecco  una  routi¬ 
ne  chiamata  molto  spesso  nella  produzio¬ 
ne  dei  grafici:  essa,  a  partire  dal  numero 
della  classe  in  cl%  e  dalle  coordinate  del¬ 
la  finestra  di  visualizzazione  (xa%,  ya% 
e  xb%,  yb%),  calcola  il  centro  degli  assi 
e  le  loro  rispettive  lunghezze  (bxw%  e 
byh%),  badando  di  lasciare  lo  spazio  vi¬ 
cino  ad  entrambi  per  i  valori  numerici  e  i 
nomi  dei  valori. 

3100-3330  (AXES):  ed  ecco  la  routine 
complementare  ad  AXESDAT:  essa  di¬ 
segna  gli  assi  e  i  commenti,  usando  i  dati 
generati  da  AXESDAT,  insieme  ad  altri 
che  vanno  aggiunti  da  parte  del  program¬ 
ma  che  le  gestisce.  Ovvero  di%,  distanza 
tra  una  linea  e  l’altra,  e  incr%,  distanza 


gli  assi  definiti  da  AXES  e  AXESDAT, 
disegnando  agli  estremi  di  ogni  segmento 
un  cerchio  campito  con  la  retinatura 
col%.  Se  si  incontra  un  dato  da  eviden¬ 
ziare  il  cerchio  campito  è  più  grande.  No¬ 
tare  che  la  misura  del  raggio  dei  cerchi 
non  è  fissa,  ma  cambia  con  il  variare  del¬ 
la  larghezza  scelta  per  il  tratto  (in  lar- 
gh%). 

3530-3750  (ISTOMULT):  ecco  la  routine 
che  gestisce  il  tracciamento  di  istogram¬ 
mi  multipli,  disegnati  effettivamente  da 
SUBBARRE,  come  abbiamo  visto  pri¬ 
ma.  Questa  routine  si  occupa  soltanto 
degli  istogrammi  affiancati,  mentre  per 
tracciare  istogrammi  sovrapposti  il  con¬ 
trollo  viene  passato  a  SOVRAPPOSTI, 
che  più  che  una  subroutine  è  un’estensio¬ 
ne  della  routine  ISTOMULT,  in  quanto 
è  chiamata  con  GOTO.  Anche  ISTO- 
MULT  ha  due  ingressi:  il  secondo  è 
ISTOMULTSUB ,  che  è  usato  dalle  due 
routine  di  grafici  misti.  ISTOMULTSUB 
traccia  infatti  con  istogrammi  affiancati 
le  classi  indicate  nell’array  c%(n)  dove 
‘n’  è  il  numero  delle  classi  da  rappresen¬ 
tare.  Questo  array  viene  definito  all'in- 


orizzontali.  Il  cuore  del  tracciamento 
istogrammi  è  invece  2820-2960,  che  rap¬ 
presenta  con  una  serie  di  barre  i  dati  del¬ 
la  classe  indicata  da  cl%,  considerando 
come  origine  degli  assi  il  punto  xc%, 
yc%,  la  larghezza  delle  barre,  la  variabi¬ 
le  largh%  e  il  colore  della  campitura 
col%.  Tutte  queste  variabili  sono  passate 
dalla  routine  ISTOMULT,  che  si  occupa 
della  gestione  di  tracciamento  di  isto¬ 
grammi  multipli.  I  vari  box  sono  tracciati 
dalla  routine  VBAR,  in  coda  al  program¬ 
ma  come  la  già  citata  TEXT.  La  semplice 


della  prima  linea  dall’asse  Y.  Questi  dati 
cambiano  a  seconda  delle  necessità  di 
ogni  specifico  grafico,  impedendo  di  fon¬ 
dere  AXES  e  AXESDAT  in  un’unica 
routine.  Le  linee  3150  e  3160  disegnano 
gli  assi;  i  loops  FOR/NEXT  delle  linee 
3200-3250  e  3270-3220  disegnano  una  gri¬ 
glia  di  riferimento  e  i  commenti,  in  oriz¬ 
zontale  sull’asse  Y  e  in  verticale  sull’asse 
X. 

3340-3520  (SUBCARTE):  routine  di  ser¬ 
vizio  nel  tracciamento  di  diagrammi  car¬ 
tesiani.  Rappresenta  la  classe  in  cl%  ne- 


terno  di  MULTIGEN,  chiamata  alla 
3610,  e  viene  letto  col  loop  3690-3710. 
Alla  fine  l’array  viene  cancellato  con 
ERASE  c%.  Per  quanto  non  sia  certo 
molto  elegante,  la  ridefinizione  degli  ar¬ 
ray  è  molto  comoda  quando  questi  varia¬ 
no  di  dimensioni,  come  nel  nostro  caso, 
di  volta  in  volta. 

3750-3890  (CARTEMULT):  la  seconda 
routine  per  tracciamenti  multipli  è  CAR¬ 
TEMULT.  Come  la  precedente  fa  uso  di 
MULTIGEN  per  l’input,  mentre  per  la 
tracciatura  si  serve  di  SUBCARTE,  vista 
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5350 
5360 
5370 
5300 
5390 
5400 
5410 
5420 
5430 
5440 
5450 
5460 
5470 
5480 
5490 
5500 
5510 
5520 
5530 
5540 
5550 
5560 
5570 
5580 
5590 
5600 
5610 
5620 
5630 
5640 
5650 
5660 
5670 
5680 
5690 
5700 
57  1  0 
5720 
5730 
5740 
5750 
5760 
5770 
5780 
5790 
5500 
5610 
5820 
5830 
5840 
5850 
5860 
5870 
5880 
8890 
59  UU 
5910 
5920 
5930 
S940 
5950 
5960 
5970 
5980 
5990 
6000 
6010 
6020 
6030 
6040 
6050 
6060  . 
6070 
6000 
6090 
6100 
6110 
6120 
6130 
10000 
10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
101  10 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 


rem  >>»  routine  sort  generica  <<<<<< 
cmb%^0 

for  n=0  to  elem%Ccl%)-2 

on  val(  r  $)  gosub  STNUM, STINUM , STALPH, STIALPH 
nextrif  cmb%rr0  then  return 
goto  5360 
STNUM : 

if  va( n , cl%) >va( n+1 .cl%)  then  gosub  INVERI 
r e  t  ur n 
STINUM : 

if  vo(  n  ,  cl%)  <  vlPPn+  1  , 


?■!%) 


then  gosub  INVERT 

return 
STALPH : 

if  com$( n  ,  c  1  %) >com$( n+1 , cl%)  then  gosub  INVERT 

return 

STIALPH : 

if  com$( n , c 1%) <com$( n+ 1 , cl%) . then  gosub  INVERT 

return 
INVERT : 

swap  va( n , c 1%) , va( n+1 ,  c  1%) : swap  com$( n , c 1 %) ,  com$( n+1 ,  c  1  %) : cmb%= 1 
swap  ev$( n,cl%] ,eu$( n+1 ,gl%) 
return 
DISCO  : 

rem _ _ 

rem  |  operazioni  1/0  DISK  | 

rem  - 

gosub  ALLW2  :  g  o  t  o  xy  0,0:?"  ****  BUSICRAF  ****"  :  ?  :  ?  "  I  /  0  DISK  MENU:" 
?"[  1]  MEMORIZZA  CLASSE" : ?"L 2]  CARICA  CLASSE" 

?  "[  3]  CANCELLA  DATI  DAL  DISCO" 

? " [ 4 ]  <--  RITORNA  UTILITY  MENU" 

?  :  ?"classi  usate  :  "  :  if  cu%^0  then  ?  " -Ne  s  s  una- "  :  go  t.  o  5670 
for  n  ^0  t.  o  c  u%-  1  :  ?  n  +  1  ;  "  :  "  ;  nome$(  n)  ;  "  "  ;  :  ne  x  t  :  ? 

?"co'it)  scegli  ?";:  gosub  ASK.NUM 
on  a%  gosub  SAI  VA , CARICA , CANCELLA 
if  a%  ‘  4  then  return 
goto  DISCO 
CANGE L LA  : 

rem _ - _ 

rem  ì  cancella  file  I 

rem  - 

?"CANCELLA  F I LE  : " : i n p u t " nome  file  da  cancellare  ( [ RET]  =exit) " ; n$ 
n$~left$( n$,0)+".DAT":if  n$=".DAT"  then  return 
Kill  n$:return 

SALVA  : 

rem  _ 

rem  |  save  classe  ! 

rem  - 

?  "  R  E  G I S  TRAZIONE  CLASSE:’"  :  gosub  ASKCLASS:if  cl%  =  -1  then  return 
?:input"Che  nome  assegno  al  file  " ; n$ : if  asc(n$)=13  then  return 
n$= 1 ef  t  $(  n$ , 8) +"  .DAT" :n  =  elem%( ol%) 
open  "0",#1,n$:write#1,n 

for  n  0  to  e  1 em%( cl%) -  1  : write/jM , com$(  n ,  cl%)  , va( n , c 1 %)  ,ev$( n , 61%) 
next  :  dose  #1  :return 
CARICA  : 

rem _ 

rem 
rem 


lood  classe  I 


if  cu%>classi  then  ?"non  ho  spazio  in  memoria  per  altre  classi" :  return 
? "CARICAMENTO  CLASSE  : " : c l%=cu% : cu%=cu%+ 1 

?:input"Nome  file  do  caricare  f[RET]-exit)";n$:n$-left$(n$,8)+".DAT 

if  n$-".DAT"  then  cu%=cu%- 1  :  re t urn 

open  "I" , U 1 , n$ 

inpu  t  # 1 ,n:e 1 em%( c 1%) ~n 

for  n~0  to  e  1  em%(  c  1  %)  -  1  :  i  nput  #  1  ,  corri$(  n  ,  c  1%)  ,  va(  n  ,  c  1%)  ,  e  v$(  n  ,  c  1%) 
next:  dose  #  1 

input  "che  nome  assegno  alla  classe  caricata" ; nome$C cl%) 
return 

UPPERCASE :  rem  >>>  n$ - >  MAIUSCOLO  <<< 

a$^"":for  n-1  to  len( n$) :b$=mid$( n$, n, 1) 

if  asc(b$)>96  and  a  set  b$) <1 22  then  a$~a$+chr$(  asc( b$) -32)  else  a$~a$+b$ 
next :n$~a$:return 

rem  _ 


I  E  R  R  0  R 


TRAPPING 


R  0  U  T  I  N  E  I 


rem 

rem  - - - - - —  -  - - - -  -  -  - 

if  erl<5880  or  erl>6010  then  goto  6120 

if  err=19  then  dose  : ?"Errore  di  caricamento.  RIPETERE ":?:?: re sume  59 

if  err  =  53  then  dose  : ?"File  inesistente." :cu%=cu%-1  :  résumé  6010 

on  errar  goto  0  : ?"linea  " ;  eri 

stop 

end 

SFTWIPTH:poke  contri ,  16  : poKe  contrl+2,  1  :poKe  contrl  +  6,3 
poke  ptsin  i%: poke  pt sin  +  2 , 0  : vdisys(  1 ): return 
SETTYPE:poke  contri  ,  15:poKe  contri +2 , 0  : poke  contrl+6,  1 
poke  intin, i%: vdisysf  1)  :  return 

VBAR:poke  contri ,11: poke  contrl+2, 2: poke  contrl+6, 0 

poke  contrl+10, 1  :  p*oke  ptsin,  x%:poke  p  t  sin  +  2,  y% 

poke  ptsin  +  4,i%:poke  ptsin  +  6, j%: vdisys{  1)  :  return 

VRB0X:poke  con t r 1 ,  1 1  : pok e  cont r 1 +2 , 2  : poke  contrl+6, 0 

poke  contrl+10, 8: pok e  ptsin, x%: poke  p t sin+2, y% 

poke  pt sin+4 , i% : poke  ptsin  +  6,j%:vdisys(  1)  :  return 

TPXT  :  poke  contri  ,  8  :  p  o  k  e  eontrl  +  2,  1  :  poKe  contrl+6, 1  e  ri  (  t  e  s  t  o  $  ) 

for  j%=0  to  len(  testo$)  -1  : poke  i n t i n  +  2* j% , a sc( mi d$(  t e s t o$ , j%+ 1  ,  1 ) )  :  ne 

poke  ptsin, x%:poke  ptsin+2,y%: vdisysC 1) :return 

BASELINE:poke  contri,  13: poke  contrl+2 ,0  : poke  contrl+6,  1 

poke  intin , i%: vdisysC  1)  :  return 

ESTREMI  : poKe  contri ,108: poke  contrl+2, 0:poke  contrl+6, 2 
poke  intin, i%: poke  intin+2, j%: vdisys( 1) :return 

LINDEF:poke  contri ,113: poke  contrl+2 , 0  : poke  contrl+6 , 1  : poke  intin, i % 
vdisys(  1 ): poke  contri , 15  : poke  contrl+2 , 0  : poke  contrl+6,  1 
poke  intin, 7: vdisysC  1) :return 

ALI..W2:  color  1 ,0,  1  ,  1  ,  1  :x%=0:y%=0: i %  =  6^0 :j%=440: gosub  VBAR:ret  urn 


in  precedenza.  Anche  qui  (3860-3870)  si 
ha  un  loop  di  lettura  dell’array  c%(n), 
che  viene  ugualmente  cancellato  dopo 
l’uso. 

3900-4140  (MULTIGEN):  ed  ecco  la 
routine  che  si  occupa  degli  input  multi- 
pii. 

E  questa  che  definisce  di  volta  in  volta 
c%()  alla  3970.  C’è  anche  un’OPTION 
BASE=0,  che  potrebbe  sembrare  super¬ 
flua.  Però  non  avendola,  ogni  tanto  capi¬ 
ta  che  il  BASIC  perda  il  valore  di  c%(0). 
La  linea  3980,  basandosi  sul  flag  fl%  si 
accorge  se  MULTIGEN  è  stata  chiamata 
da  una  routine  di  tracciamento  misto 
(fl%=2)  e  in  quel  caso  avverte  che  la 
classe  inserita  per  prima  sarà  rappresen¬ 
tata  diversamente.  Ma  il  compito  di 
MULTIGEN,  più  che  riempire  c%(),  è 
trovare  la  classe  che,  tra  quelle  inserite, 
raggiunge  il  valore  più  alto  (4020-4090)  e 
porla  in  c%(0),  cosicché,  posto 
cl%=c%(0)  (4100)  la  routine  AXE- 
SDAT  lavori  coi  valori  massimi  ottenibi¬ 
li,  evitando  così  che  le  routine  di  traccia¬ 
tura  vadano  fuori  schermo.  Si  notino  gli 
SWAP  c%(0),  c%(tp%)  delle  4090  e 
4110  (tp%  punta  all’elemento  di  c%() 
che  raggiunge  il  massimo).  In  questo  mo¬ 
do  alla  4090  in  c%(0)  va  la  classe  col  va¬ 
lore  massimo,  e,  settato  cl%,  essa  torna 
al  suo  posto,  assicurando  così  che  la  trac¬ 
ciatura  avvenga  nell’ordine  richiesto. 
4130-4450  (SOVRAPPOSTI):  questa  è 
una  delle  routines  più  lunghe:  è  chiamata 
da  ISTOMULT  e  stampa  istogrammi  so¬ 
vrapposti.  La  sua  lunghezza  è  causata  dal 
dover  compiere  lei  stessa  i  compiti  di  in¬ 
put  e  di  tracciatura  che  negli  altri  casi 
sono  svolti  da  subroutines  particolari. 
Questo  è  dovuto  al  fatto  che  per  gli  isto¬ 
grammi  sovrapposti  è  necessario  non  so¬ 
lo  conoscere  le  classi  che  dovranno  esse¬ 
re  rappresentate,  ma  anche  definire  ex¬ 
novo  una  classe  che  contenga  per  ogni 
dato  la  sommatoria  dei  dati  corrispon¬ 
denti  delle  varie  classi.  MULTIGEN  non 
ha  questa  possibilità,  che  viene  così  svol¬ 
ta  dalle  linee  4230-4330.  La  nuova  matri¬ 
ce  deve  fare  parte  dell’array  va(x,  y),  che 
contiene  tutti  i  dati  numerici  inseriti,  per 
essere  riconosciuta  dalle  routines  AXE- 
SDAT  e  AXES.  Per  questo  all’inizio  (li¬ 
nea  1050)  esso  viene  definito  con  una  di¬ 
mensione  eccedente  le  reali  necessità 
(classi  +  1).  Lo  spazio  che  si  forma  così  è 
disponibile  per  SOVRAPPOSTI  e  viene 
identificato  da  AXESDAT  con  va(x, 
classi  +  1). 

Anche  la  tracciatura  è  autogestita,  da 
4340  a  4450,  con  due  FOR/NEXT  nidifi¬ 
cati. 

4460-4580  (AREE):  dopo  la  routine  di 
tracciatura  più  complessa  ecco  la  più 
semplice.  Essa  infatti  non  deve  occuparsi 
d'altro  che  di  chiamare  MULTIGEN  e, 
col  loop  4540-4560,  AREESUB,  che 
traccia  il  grafico  ad  area  della  classe  cl%. 
4590-4750  (AREESUB):  traccia  il  grafi- 
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co  ad  area  della  classe  clr/r .  La  lunghezza 
delle  linee  fra  un  valore  e  l’altro  è  calco¬ 
lata  direttamente  dalla  4680. 

4760-4920  (MISTOl):  gestisce  la  stampa 
di  istogrammi  sovrapposti  a  un  diagram¬ 
ma  ad  aree.  Si  pone  per  questo  il  flag 
fl%=2  e  x$=“ad  Aree”,  per  comunicare 
a  MULTIGEN  di  regolarsi  come  abbia¬ 
mo  visto  prima.  Definita  c%()  si  passa  a 
tracciare  il  grafico  ad  area  con  ÀREE- 
SUB,  passando  cl%=c%(0).  Dopo  aver 
fatto  poi  scalare  di  un  posto  gli  elementi 
di  c%(),  così  da  avere  in  c%(0)  quello 
che  stava  in  c%(l)  (4890),  si  chiama 
ISTOMULT  che  provvede  al  resto. 

Alla  fine  il  flag  torna  a  0. 

4930-5100  (MIST02):  ultima  routine  ge¬ 
stita  dall’output  menu.  Traccia  degli  isto¬ 
grammi  sovrastati  da  un  diagramma  car¬ 
tesiano  ed  è  simile  alla  precedente. 

La  differenza  è  che  al  ritorno  da  MUL- 
TIGEN  il  numero  della  classe  che  stava 
in  c%(0)  va  in  fondo  all’array  (5000),  per 
poter  disegnare  per  primi  gli  istogrammi. 
Le  coordinate  degli  assi  sono  poste  in 
xs%  e  ys%  perchè  ISTOMULTSUB, 
chiamata  da  5060,  altera  gli  originari  va¬ 
lori  xc%,  yc%,  che  vengono  ripristinati 
in  5070,  per  passare  il  controllo  a  SU¬ 
BCARTE  (5080). 

5110-5290  (TOOLS):  è  fatta.  Siamo  arri¬ 
vati  all’UTILITY  MENU,  e  la  strada  è 
ormai  alla  fine.  Le  funzioni  che  seguiran¬ 
no  sono  infatti  le  più  semplici  del  pro¬ 
gramma. 

5300-5560  (SORT):  è  la  routine  che  si 
occupa  di  tutti  gli  ordinamenti,  essendo 
l’algoritmo  uguale  per  tutti,  a  differenza 
dei  riferimenti  a  va(x,y)  e  a  com$(x,y), 
che  sono  gestiti  dalle  varie  ‘miniroutines’ 
STNUM  (ordinamento  numerico),  STI- 
NUM  (ordinamento  numerico  inverso), 
STALPH  (ordinamento  alfabetico), 
STIALPH  (alfabetico  inverso). 
5570-5700  (DISCO):  menu  di  gestione 
del  floppy  disk.  Tutte  le  operazioni  av¬ 
vengono  sul  floppy  di  default  (normal¬ 
mente  A). 

5710-5770  (CANCELLA):  con  KILL 
cancella  il  file  dal  nome  nS,  al  quale  è 
aggiunta  l’estensione  “.DAT” 

5780-5870  (SALVA):  apre  alla  linea 
5850  un  file  chiamato  n$+“.DAT”  e  al 
suo  interno  scrive  per  prima  cosa  (con 
WRITE#,  più  indicata  di  PRINT#) 
elem%(cl%),  e  in  seguito  i  dati,  inseren¬ 
do  com$  prima  il  nome  (cpm$(n,cl%))  e 
poi  il  valore  (va(n,cl%)). 

5880-6010  (CARICA):  cerca  sul  disco  il 
file  di  nome  n$+“.DAT”,  lo  apre  e  asse¬ 
gna  a  elem%(cl%)  il  primo  valore  letto. 
Su  questo  numero  sarà  basato  il  loop 
5980-5990  che  legge  tutti  i  dati.  Alla  clas¬ 
se  così  definita  sarà  poi  dato  un  nome 
inserito  da  tastiera,  non  il  nome  del  file. 
6020-6050  (UPPERCASE):  porta  in 
maiuscolo  la  stringa  n$. 

10000-10210:  ecco  le  famose  routine  gra¬ 
fiche  che  appaiono  chiamate  in  tutto  il 


programma.  Esse  usano  le  routine  VDI 
che  gestiscono  la  grafica  del  520  e  posso¬ 
no  essere  usate  in  qualsiasi  programma. 
Vediamole  velocemente. 

SETWIDTH:  regola  la  larghezza  delle  li¬ 
nee,  inserita  in  i%  (da  1  a  25). 
SETTYPE:  seleziona  il  pattern  delle  li¬ 
nee,  posto  in  i%  (da  1  a  6). 

VBAR:  disegna  un  rettangolo  campito 
col  colore  e  la  retinatura  correnti:  x%, 
y%=coordinate  del  punto  in  alto  a  sini¬ 
stra;  i%,  j%=coordinate  punto  in  basso 
a  destra. 

VRBOX:  come  sopra,  ma  il  rettangolo  ha 
gli  angoli  arrotondati. 

TEXT:  stampa  la  stringa  testo$  a  partire 
dalle  coordinate  grafiche  x%,y%. 
BASELINE:  regola  l’inclinazione  delle 
scritte  secondo  l’angolo  in  i%  (0,900, 
1800,  2700). 

ESTREMI:  seleziona  la  forma  degli 
estremi  delle  linee;  i%  inizio  linea,  j% 
fine  linea  (0=estremi  piatti,  l=frecce, 
2= arrotondati). 

LINDEF:  definisce  il  pattern  delle  linee, 
inserito  in  i%  (es  i%  =  &haaaa). 
ALLW2:  disegna  con  VBAR  un  rettan¬ 
golo  grande  tutto  lo  schermo  con  il  colo¬ 
re  dello  sfondo.  In  pratica  cancella  gli 
accessori  della  Output  Window  e  il  suo 
contenuto. 

COSTANTI 

CLASSI:  indica  il  numero  delle  classi  che 
Busigraf  può  gestire  meno  uno.  È  defini¬ 
ta  alla  linea  1030  e  può  essere  tranquilla¬ 
mente  mutata. 

PI:  pigreco,  usata  da  AREOGRAMMI. 
cpu%:  usata  da  SOVRAPPOSTI,  è  sem¬ 
pre  CLASSI  +  1. 

fr$  e  frl$:  stringhe  usate  da  PRINT 
USING  per  la  stampa  formattata  dei 
dati. 

ARRAYS 

va(x,y):  valori  numerici  dei  dati.  X  è  il 
numero  d’ordine  (da  0  a  23)  e  Y  è  il  nu¬ 
mero  della  classe.  Le  dimensioni  sono  va 
(23,  classi+1).  La  classe  va  (x,  classi  +1) 
contiene,  durante  SOVRAPPOSTI,  in 
ogni  elemento,  la  sommatoria  degli  ele¬ 
menti  corrispondenti  delle  varie  classi  da 
rappresentare. 

com$  (x,y):  nomi  legati  ai  valori  X  e  Y 
come  sopra;  com$  (x,  classi  +  1)  contie¬ 
ne  in  SOVRAPPOSTI,  i  nomi  dei  dati 
della  classe  numero  c%(0). 
ev$  (x,y):  tabella  delle  evidenziature.  Se 
ev$  (x,y)  =  allora  il  dato  X  della 
classe  Y  va  evidenziato. 
nome$(n):  nome  della  classe  ‘n’. 
eleni  %(n):  elementi  usati  da  ogni  classe. 
‘N’  è  il  numero  della  classe. 
c%(n):  array  definito  da  MULTIGEN, 
contiene  normalmente  ncl%  valori,  che 
corrispondono  ai  numeri  delle  classi  da 
rappresentare  nei  tracciamenti  multipli. 
Viene  cancellato  dopo  ogni  tracciamento 
e  ridefinito  all’occorrenza. 


FLACS 

fi  %  :  flag  è  normalmente  0,  1  se  è  in  fun¬ 
zione  la  routine  RIEMPIMENTO,  2  se  è 
in  funzione  una  delle  due  routines  di 
tracciamento  multiplo. 
cmb%:  flag  usato  da  SORT.  cmb%=0 
indica  che  non  sono  stati  fatti  cambia¬ 
menti  nell’ordine  degli  elementi, 
cmb%  =  l  il  contrario. 
r$:  flag  stringa  con  vari  usi.  RS  =  “or" 
negli  istogrammi  orizzontali,  in  SORT 
R$  =  “1”...  “4”  indica  quale  ordinamen¬ 
to  effettuare  dei  quattro  disponibili. 


VARIABILI 

cu%:  numero  delle  classi  usate. 
ncl%:  numero  delle  classi  da  rappresen¬ 
tare  contemporaneamente.  Definita  da 
MULTIGEN,  appare  già  a  1110  perchè  è 
controllata  anche  da  quelle  routines  che 
non  la  chiamano. 

cl%:  all’interno  di  tutte  le  routines,  fa 
riferimento  alla  classe  su  cui  si  deve  ope¬ 
rare  o  si  sta  operando. 
da%:  usata  da  RIEMPIMENTO.  Indica 
il  numero  del  dato  dal  quale  cominciare  a 
chiedere  i  dati. 

xa%,  ya%:  usata  dalle  routines  grafiche. 
Sono  coordinate  assolute  ovvero  riferite 
non  alla  Output  Window,  ma  all’angolo 
alto-sinistra  del  video. 
xb%,  yb%:  come  sopra.  Sono  le  coordi¬ 
nate  dell’angolo  in  basso  a  destra, 
an  e  ani:  usate  da  AREOGRAMMI. 
An%  è  l’angolo  tracciato  fino  al  momen¬ 
to  in  cui  viene  letta,  anl%  è  l’angolo  cor¬ 
rispondente  al  valore  di  va(n,  cl%).  En¬ 
trambe  sono  espresse  in  centesimi  di  gra¬ 
do  sessagesimale. 

xc%,  yc%:  in  AREOGRAMMI  sono  le 
coordinate  relative  alla  OUTPUT  WIN¬ 
DOW  del  centro  del  diagramma;  altrove 
sono  le  coordinate  assolute  dell’origine 
degli  assi  cartesiani,  calcolate  da  AXE- 
SDAT. 

bxw%,  byh%:  dimensioni  degli  assi  car¬ 
tesiani  calcolate  da  AXESDAT. 
max,  mx  e  max$:  usate  da  tutte  quelle 
routines  che  devono  calcolare  i  massimi 
delle  classi  e  le  stringhe  più  lunghe  tra  i 
nomi  dei  valori. 

dist%:  usata  da  BARRE  e  SUBBAR¬ 
RE.  E  la  distanza  tra  una  barra  e  la  suc¬ 
cessiva  in  un  istogramma. 
largh%:  larghezza  delle  barre  negli  isto¬ 
grammi  e  del  tratto  nei  diagrammi  carte¬ 
siani. 

di%:  usata  da  AXES,  è  la  distanza  tra  le 
linee  verticali  di  un  diagramma. 
incr%:  usata  da  AXES,  è  la  distanza  del¬ 
la  prima  linea  verticale  dall’asse  Y. 
col%:  codice  della  retinatura  corrente. 
x%,  y%,  i%,  j%:  generalmente  servono 
da  input  alle  routines  VDI. 
a%,  b%,  tp%,  sl%,  s2%:  variabili  di 
comodo. 

n,  j,  k:  variabili  di  ciclo. 
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DI  MAURO  PAVONE 


WINTER 

olympics 

Categoria:  Arcade 
Produttore:  Tynesoft 
Configurazione: 

Atari  130-800 


Sul  genere  sportivo,  co¬ 
me  è  noto,  sono  stati 
prodotti  diversi  giochi, 
in  particolare,  sugli  sport  “in¬ 
vernali”  ne  sono  usciti  molti; 
tra  questi,  è  ben  noto  WIN¬ 
TER  GAMES  per  la  sua  riu¬ 
scita  grafica,  molto  realistica, 
e  per  la  sua  giocabilità  che,  a 
volte,  però,  può  risultare  un 
po’  complessa  ed  impegnati¬ 
va.  Bene!  Per  chi  vuole  ci¬ 
mentarsi  in  tutti  quegli  sport 
ambientali  fra  le  nevi  dei 
monti  e  i  ghiacci  delle  piste, 
senza  risultati  disastrosi,  in 
una  sede  divertente,  curata 
graficamente,  attraente  sotto 
tutti  gli  aspetti,  non  ha  da  fa¬ 
re  altro  che  recarsi  alle 
OLIMPIADI  INVERNALI. 
Per  farlo  bastano,  natural¬ 


mente,  il  vostro  buon  vecchio 
Atari  con  il  gioco  WINTER 
OLIMPICS;  così,  avrete  a 
vostra  disposizione  ben  cin¬ 
que  diverse  discipline  sporti¬ 
ve  per  scaricare  le  vostre 
energie  di  troppo. 

-  SPEED  SKATING  (patti¬ 
naggio  di  velocità)  Per  parti¬ 
re  e  continuare  a  pattinare  in 
piena  velocità  dovete  sma- 
nettare  con  il  joystick  nei  due 
lati  (come  in  buona  parte  dei 
giochi  sportivi),  finché  non 
completerete  il  percorso  con¬ 
sistente  in  ben  200  metri  pia¬ 
ni.  Il  tempo  più  basso  vi  aiu¬ 
terà  a  raggiungere  un  punteg¬ 
gio  più  alto. 

-  SLALOM 

In  questa  prova  dovete  scen¬ 
dere  a  valle  evitando  di  urta¬ 
re  le  bandierine  o  di  passare 
all’esterno  di  esse,  altrimenti 
vi  verrà  assegnata  una  penali¬ 
tà  che  peserà  sul  vostro  tem¬ 
po,  ed  evitando  di  urtare  gli 
alberi,  con  conseguente  pas¬ 
saggio  immediato  alla  prova 
successiva.  Per  muoversi 
orizzontalmente  spostate  la 
leva  a  destra  e  a  sinistra,  lo 
sciatore  si  sposterà  diagonal¬ 
mente  nella  direzione  scelta  e 
tornerà  in  posizione  verticale 
solo  uando  muoverete  la  leva 
nel  senso  opposto  a  quello 
corrente.  Acquistare  padro¬ 
nanza  con  questo  tipo  di  mo¬ 
vimento  all’inizio  può  risulta¬ 
re  difficoltoso,  ma  dopo  un 
po’  di  pratica  vi  troverete  suf¬ 
ficientemente  abili  per  af¬ 


frontare  la  discesa  e  imbocca¬ 
re  lo  spazio  fra  le  bandierine 
che  vi  sarà  segnalato  con  un 
suono. 

-  SKY-JUMP 

Ecco  una  prova  impegnativa 
fra  le  tante  abbastanza  sem¬ 
plici!  Per  riuscire  a  saltare 


dovete  attentamente  seguire 
le  istruzioni  che  vi  indicherò 
qui  di  seguito: 

-  muovere  rapidamente  la 
leva  nei  due  lati  in  modo  da 
fare  aumentare  la  velocià  che 
sarà  importante  per  affronta¬ 
re  il  salto  (movimento  analo¬ 
go  al  pattinaggio) 

-  quando  la  discesa  termina 
premete  istantaneamente  il 
bottone  del  joystick  e  spinge¬ 
te  la  leva  in  avanti,  riuscendo 
così  a  saltare  se  tutto  è  stato 
fatto  correttamente  vedrete  il 
vostro  sciatore  spiccare  un 
salto  proporzionato  allo  slan¬ 
cio  iniziale  e  poco  dopo  l’at¬ 


terraggio  un  valore  numerico 
posizionato  in  alto  a  sinistra 
vi  segnalerà  la  distanza  rag¬ 
giunta. 

-  DOWNHILL  (discesa  li¬ 
bera) 

Il  metodo  è  simile  a  quello 


.  ♦  A 


della  seconda  prova,  in  que¬ 
sto  caso,  però,  bisogna  solo 
stare  attenti  a  non  urtare  gli 
alberi. 

-  CRESTA  RUN 
Fra  i  cinque  sport,  la  corsa  su 
bob,  si  prospetta  come  la  più 
divertente;  ma  bisogna  fare 


attenzione  perché  anche  se  le 
regole  da  seguire  sono  poche 
bisogna  saperle  rispettare  per 
superare  “gloriosamente”  la 
specialità. 

In  questa  schermata  viene 
raffigurata,  in  grande,  a  de¬ 
stra  la  pianta  della  pista 
(blu),  in  mezzo  agli  alberi, 
che  si  accorcerà  man  mano 
che  la  percorrerete  con  il  vo¬ 
stro  bob. 

A  sinistra  c’è  il  riquadro  che 
raffigura  il  vostro  bob  visto 
posteriormente,  dentro  il  ca¬ 
nale  della  pista,  ed  il  percor¬ 
so  che  c’è  davanti  a  voi.  Per 
curvare  spostate  la  leva  del 


joystick  a  destra  e  a  sinistra, 
cercando  di  controllare  il  vo¬ 
stro  mezzo  senza  farvi  tra¬ 
sportare  all’esterno  della  pi¬ 
sta  dalla  forza  centrifuga, 
contrapponendo  il  vostro 
movimento  alla  direzione 
della  curva.  Se  riuscirete  ad 
imboccare  bene  le  curve 
prenderete  l’adeguata  veloci¬ 
tà  per  fare  un  buon  tempo. 
Vi  accorgerete  del  termine 
del  percorso  quando  vedrete 
sparire  completamente  la  pi¬ 
sta  dal  lato  destro  dello 
schermo. 

Infine,  vi  ricordo  che  ad  ogni 
prova  potete  scegliere  se  far 
pratica  o  gareggiare  regolar¬ 
mente  contribuendo  all’in¬ 
cremento  del  punteggio.  Se 
sceglierete  di  gareggiare 
avrete  per  ogni  specialità  ben 
tre  possibilità  complete. 
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DI  MAURO  PAVONE 


AITERNATE 

REALITY 

Categorìa:  Arcade 
Produttore:  Datasoft 
Configurazione: 

Atari  ST  +  monitor  a  colori. 
Atari  130/800 


Dopo  pochi  secondi  di 
caricamento,  sul  vi¬ 
deo  appare  un’ampia 
visuale  di  una  metropoli.  Da 
quel  momento  inizia  la  vicen¬ 
da  che  sarà  alla  base  di  tutto 
il  gioco  (e  che  potrai  inter¬ 
rompere  per  passare  al  gioco 
vero  e  proprio  senza  perdere 
tempo). 

Il  traffico  cittadino  che  di¬ 
sturba  la  quiete,  verrà  presto 
interrotto  dalFarrivo  di  un’a¬ 
stronave  che  ti  rapirà  per 
portarti  a  XEBEC’S  DEMI- 
SE,  nella  galassia  più  lon¬ 
tana. 


Ottima  la  presentazione  di 
questo  singolare  adventure 
che  può  sembrare  l’inizio 
trionfale  di  un  film  fanta¬ 
scientifico,  integrata,  soprat¬ 
tutto,  da  una  colonna  sonora 
stupenda  (da  cantare,  se  vo¬ 
lete,  seguendo  i  testi  ‘dettati’ 
dal  video). 

Per  giocare,  dopo  aver  for¬ 
mattato  un  disco,  con  l’opzio¬ 
ne  ‘I’,  indispensabile  per  la 
memorizzazione  del  perso¬ 
naggio  e  dopo  aver  scelto  se 
usare  un  carattere  nuovo. 


te  per  superare  le  diverse  si¬ 
tuazioni,  più  o  meno  impe¬ 
gnative,  che  si  verificheranno 
nel  corso  del  gioco,  ma  non 
sarà  l’unica  per  fuggire  della 
città. 

Il  paesaggio  di  XEBEC’S 
DEMISE  è  composto  da  al¬ 
berghi  utili  per  l’alloggio  e  le 
informazioni  sul  tempo  e  sul¬ 
le  date,  le  osterie  che  offrono 
intrattenimenti  vari  (anche 
molto  utili  e  indicativi  per  ar¬ 
rivare  alla  soluzione  del  gio¬ 
co),  le  banche,  i  negozi  che  ti 


essere  rischioso  data  la  tua 
inferiorità  rispetto  agli  altri; 
comunque,  essendo  una  cosa 
che  si  verficherà,  devi  impa¬ 
rare  ad  essere  all’altezza  del¬ 
le  straordinarie  creature  che 
incontrerai. 

Per  la  tua  sopravvivenza  sono 
necessarie  anche  le  armi  che 
puoi  trovare  dopo  un  incon¬ 
tro,  dopo  aver  scoperto  un 
tesoro  o  comprarle  da  un  fab¬ 
bro,  le  posizioni  possono  in¬ 
vece  essere  svantaggiose,  be¬ 
nigne,  vantaggiose  o  perico¬ 


uno  preesistente  o  uno  tem¬ 
poraneo,  passerai  alla  scelta 
delle  tue  capacità  iniziali. 
Nella  parte  superiore  del  vi¬ 
deo  appaiono  6  caselle  con 
dei  numeri  che  variano  ripe¬ 
tutamente,  tu  schiacciando 
RETURN  fisserai  tali  valori 
che  corrispondono  alla  resi¬ 
stenza,  al  fascino,  alla  forza, 
all’abilità,  all’intelligenza  e 
alla  saggezza.  Ognuna  di 
queste  qualità  sarà  importan¬ 


possono  far  diventare  ricco  e 
quindi  abbellire  la  tua  perso¬ 
na  ed,  infine,  i  passaggi  se¬ 
greti  presenti  nei  muri  che  so¬ 
no  visibili  solo  da  un  lato  e 
attraversabili  da  quello  invisi¬ 
bile  (!).  I  personaggi  che  in¬ 
contri  possono  essere  fabbri, 
guaritori  e  forma  di  vita  come 
gli  umanoidi,  i  cittadini,  i 
commercianti,  i  corrieri,  le 
guardie,  etc.  In  ogni  caso, 
qualsiasi  tipo  d'incontro  può 


lose  ed,  infine,  il  veleno  è  as¬ 
solutamente  da  evitare  per 
conservare  la  salute. 

Per  muoverti,  puoi  usare  il 
joystick  o  la  tastiera  (tasti  I- 
alto,  K-basso,  J-sinistra,  L- 
destra).  La  ricerca  della  tua 
strada,  nella  città,  è  semplifi¬ 
cata  dall’uso  di  una  bussola 
che  puoi  comprare  premendo 
SELECT  fino  a  che  la  vedi 
apparire  sullo  schermo;  la  tua 
direzione  sarà  sempre  la  più 
alta  sullo  schermo. 

Per  concludere  la  panorami¬ 
ca  su  questo  splendido 
adventure,  bisogna  citare  la 
finestra  grafica  (al  centro  del 
video)  che  offre  una  visuale 
sul  paesaggio  veramente  ben 
realizzata,  d’altra  parte  come 
tutto  il  programma. 
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DI  MAURO  PAVONE 


The  dictator  strikes  bach 

Categorìa:  Arcade 
Produttore: 

Access  Software 
Distributore:  Giucar 
Configurazione: 

Atari  130-800 


Il  dittatore  colpisce  anco¬ 
ra!  Dopo  il  successo  di 
Beach  Head,  ecco  la  se¬ 
conda  versione  del  famoso 
gioco  che  ci  ha  proposto  co¬ 
me  motivo  di  svago  una  “di¬ 
vertente”  simulazione  di  bat¬ 
taglia,  qui  in  veste  rinnovata 
secondo  le  esigenze  sempre 
più  raffinate  degli  amanti  di 
giochi  di  questo  genere. 

I  giocatori  possono  essere 
uno  o  due. 

Nel  primo  caso  voi  sarete  gli 
alleati  e  dovrete  sfidare  il  dit¬ 


tatore  (quale  non  si  sa!!!),  nel 
secondo  caso  vi  spartirete  a 
vostra  scelta  i  due  ruoli. 

I  livelli  di  gioco  sono  3  e  c’è  la 
possibilità  di  fare  un  po’  di 
pratica  prima  di  passare  alla 
sfida  vera  e  propria. 

Nell’ ATTACCO  voi  control¬ 
late  l’elicottero  sulla  parte  su¬ 
periore  che  deve  lanciare  i 
soldati,  disponendoli  dietro  i 
4  muri  protettivi  posteriori 
senza  che  il  dittatore  li  uccida 
con  il  suo  cannone.  Nel  la¬ 
sciarli  dovete  posizionarvi  ad 
un’altezza  adeguata  in  modo 
che  i  soldati  non  atterino  nel¬ 
la  foresta.  Quando  li  avrete 
messi  tutti  al  riparo  l’elicotte¬ 
ro  sparirà  dalla  scena  e  un 
cursore  punterà  ciclicamente 
i  4  muri.  Premendo  FI  RE 
sceglierete  il  muro  segnato 
dal  cursore  dal  quale  uscirà 
un  soldato  che  si  porterà  in 
prima  linea  con  il  movimento 
della  manopola.  Quando  tut¬ 
ti  i  soldati  saranno  avanzati 
dovrete  farne  preparare  uno 
all’attacco  premendo  FIRE, 
poi  ripremendo  farete  uscire 
il  compagno  che  vi  coprirà  le 
spalle  mentre  voi  andrete  da¬ 
vanti  al  cannone  per  lanciare 
una  bomba  (sempre  con  il  FI- 
RE). 

Fino  aH'esaurimento  degli 


contro  tutti  i  possibili  attenta¬ 
tori  dell’omino  che  attraversa 
lo  schermo  (l’alleato),  cioè  il 
carrarmato  che  tenta  di  inve¬ 
stirlo,  il  furgone  e  l’uomo  ap¬ 
postato  in  cima  al  muro  della 
caserma  che  gli  spara. 
Concluso  il  tentativo  di  salva¬ 
taggio,  devi  fuggire  con  t\  tuo 
elicottero  attraversando  un 
campo  carico  di  insidie.  Tor¬ 
rette  e  altre  realizzazioni  bel¬ 
liche  tenteranno  di  distrug¬ 
gerti.  Il  carroarmato,  poten¬ 
dosi  muovere  orizzontalmen¬ 
te,  è  molto  più  pericoloso. 


pontili  ai  lati  dove  ci  saranno, 
il  nemico  a  sinistra  e  il  vostro 
uomo  sul  lato  opposto.  L’ob- 
biettivo  di  questa  BATTA¬ 
GLIA  è  di  uccidere  l’avversa¬ 
rio  con  4  coltellate  (ben  pian¬ 
tate!)  che  voi  lancerete  pre¬ 
mendo  FIRE,  indirizzando  il 
lancio  con  la  manopola  del 
joystick.  In  questo  simpatico 
“match”,  i  due  avversari  si 
scambieranno  messaggi  ironi¬ 
ci,  frasi  da  fumetti  e  risate  di 
vittoria,  secondo  lo  spirito 
tanto  avvincente  di  tutto  il 
gioco. 


uomini  dovrete  attaccare  il 
dittatore  senza  eccessive  per¬ 
dite  di  vite,  cercando  di  tota¬ 
lizzare  il  massimo  punteggio. 
Nel  SALVATAGGIO  il  can¬ 
none  in  primo  piano  sarà, 
questa  volta,  la  vostra  arma. 
Il  vostro  compito  è  di  sparare 


quindi  ti  conviene  colpirlo 
immediatamente  disponen¬ 
doti  alla  sua  altezza. 

Per  concludere  trionfalmente 
la  sfida,  vi  cimenterete  in  un 
duello  con  il  dittatore  stesso. 
In  questa  “manche”  il  sipario 
si  apre  su  un  fiume  con  due 
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PUNTI 

VENUTA 

ATARI 1987 


CAMPANIA 

2G  -  V.  Dalmazia  53  -  Salerno 
ABS  -  V.  Renzullo  -  Nola 

AUTORADIO  di  Acanfora  Rosa  -  Vico  Ferrovia  11  -  Napoli 
BABY  TOYS  di  Canetti  SAS  -  V.  Cisterna  dell’Olio  5B  -  Napoli 
CENTRO  COMPUTER  GRAFICA  -  P.tta  Durante  7  -  Napoli 
CENTRO  SANDOZ  -  P.zza  Municipio  56  -  Napoli 
CERMA  SAS  -  V.  Giovanni  Amendola  22/24  -  Afragola 
CF  ELETT.  PROFESSIONALE  -  C.so  Vittorio  Emanuele  54  -  Napoli 
CF  ELETTRONICA  -  V.  Luca  Giordano  40/42  -  Napoli 
CF  ELETTRONICA  -  V.  G.  Battisti  -  Napoli 
CF  ELETTRONICA  PROFESS.  -  V.  Marino  11/13  -  Piano  di  Sore 
COMMODORE  CLUB  CAMPANIA  -  V.  Portalba  17/A  -  Napoli 
COMPUTER  CENTER  SRL  -  P.zza  S.  Alfonso  19/A  -  Pagani 
COMPUTER  CLUB  -  V.  Degli  Orti  2  -  Salerno 
COMPUTER  DAY  SRL  -  V.  Cilea  256  -  Napoli 
COMPUTER  LAND  SRL  -  V.  Robertelli  17/B  -  Salerno 
COMPUTER  MARKET  SRL  -  C.so  Garibaldi  47  -  Salerno 
ELESYS  di  Carbone  Anna  -  V.  Mazzini  107  -  Battipaglia 


EUROMERCATO  CAMPANIA  SPA  -  V.  Salvatore  1  -  Casoria 
GENERAL  COMPUTER  -  C.so  Garibaldi  56  -  Salerno 
GENERAL  SYSTEM  SRL  -  C.so  Trieste  29  -  Caserta 
GLM  COMPUTER  SRL  -  C.so  Garibaldi  141  -  Palmi 
GRUPPO  BUSH  SRL  -  Gali.  Umberto  I  55  -  Napoli 
INFORMATA  METHOD  COMPUTER  -  V.  A.  Garofano  58  -  Aversa 
MUSICAL  di  Tutore  Maria  -  V.  S.  Sebastiano  17  -  Napoli 
NEW  OTTICA  -  Gali.  Umberto  I  55  -  Napoli 
ORION  INFORMATICA  -  V.  Virgilio  32  -  Castellante 
PARIEL  SRL  -  V.  I  Maggio  5  -  Casoria 
POLITECNICO  ITALIANO  -  V.  S.  Arcangelo  Abaiano  -  Napoli 
STRUMENTI  MUSICALI  -  V.  S.  Sebastiano  8  -  Napoli 
TECNOBYTE  SAS  -  V.  Risorgimento  53  -  Marigliano 
TOP  ELECTRONICS  -  V.  S.  Anna  dei  Lombardi  16  -  Napoli 


EMILIA  ROMAGNA 


ARGNANI  F.lli  -  P.zza  Libertà  5  -  Faenza 

COMPUTER  FACILE  -  V.  Don  Minzoni  4/B  -  Bologna 

COMPUTER  HOUSE  di  Sassi  M.  Pia  -  V.  Secchi  28/D  -  Reggio  Emilia 

COMPUTERSHOP  di  Ronchi  Tonino  -  V.  Emilia  199/B  -  Imola 

DIMENSIONE  COMPUTER  -  V.  E.  De  Amicis  16/A  -  Porto  Maggio 

EASY  COMPUTER  -  V.  Lagomaggio  50  -  Rimini 

GENIUS  di  Varani  -  V.  Taverna  44/E  -  Piacenza 

GRIFO  SNC  -  V.  Dante  1  -  S.  Giorgio  D 

HOME  E  PERSONAL  COMPUTER  -  P.zza  Melozzo  1  -  Forlì 

MICROINFORMATICA  di  Ruini  e  Mauro  -  P.zza  M.  Partigiani  31  - 

Sassuolo 

OCA  INFORMATICA  -  P.zza  G.  da  Verazzano  6  -  Bologna 

ORSA  MAGGIORE  -  P.zza  Matteotti  20  -  Modena 

PAOLINI  MARIO  -  V.  Candiano  23  -  Ravenna 

S.C.  COMPUTER  di  G.  Capra  e  C.  SNC  -  V.  S.  Martino  4  -  Castel. 

S.P. 

SOFT  &  COMPUTER  -  V.  Carlo  Mayr  85  -  Ferrara 
TECNO  CONSULTING  -  V.  Catalani  3  -  Parma 
TRIA  ELETTRONICA  SRL  -  V.  Zacconi  28/A  -  Parma 
TUTTO  PER  IL  BIMBO  di  Babini  Flavio  -  V.  G.  Rignoli  15  -  Forlì 
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LAZIO 

ABBEY  ROAD  SNC  -  V.  Siria  5/7  -  Roma 

ADM  SRL  -  V.  Tacito  88  -  Roma 

ALFA  LEASING  SRL  -  V.  Illiria  18  -  Roma 

ALL  COMPUTER  SRL  -  V.  Catalani  31  -  Roma 

APC  SRL  -  V.  Catalani  19/23  -  Roma 

BANDIERA  SRL  -  V.  Cavour  125  -  Roma 

BIMBICA  ANTONIO  -  V.  Tagliamelo  57  -  Roma 

CHERUBINI  SNC  -  V.  Tiburtina  360  -  Roma 

CIAMPI  SRL  -  V.  Vespasiano  34  -  Roma 

COMPUTEL  -  V.  E.  Rolli  33  -  Roma 

COMPUTER  -  V.  E.  Rolli  3  -  Roma 

COMPUTER  FRIEND  SRL  -  V.  A.  Romano  3  -  Roma 

COMPUTERLINE  SRL  -  V.  M.A.  Colonna  12  -  Roma 

COMPUTIME  -  V.  Cola  di  Rienzo  28  -  Roma 

COMPUTIME  -  V.le  Parioli  25  -  Roma 

COMPUTRON  SHOP  -  Largo  Fornao  7/B  -  Roma 

D’ALBORE  CRISTINA  -  V.  Principe  Amedeo  52  -  Roma 

DIGITRON  SRL  -  V.  Lucio  Elio  Seiano  15  -  Roma 

DISITACO  SRL  -  V.  Poggio  Moiano  34/C  -  Roma 

DUE  EMME  ELETTRONICA  SRL  -  V.  Britannia  17  -  Roma 

ELETTRONICA  2003  -  V.  Antonio  Cozzi  13  -  Roma 

MASTERBIT  SNC  -  V.  Dei  Romagnoli  35  -  Ostia 

MIDI  WARE  SRL  -  V.le  Parioli  101/C  -  Roma 

ORGANIZ.  SERVIZ.  ELETTRONI  -  V.  Tuscolana  465  -  Roma 

SICOM  ITALIA  SPA  -  P.zza  Regina  Margherita  -  Roma 

SYNCROM  SRL  -  V.  F.  Massimo  32  -  Roma 


LIGURIA 

2002  ELETTROMARKET  -  V.  Monti  15/R  -  Savona 
ABM  COMPUTERS  SRL  -  P.zza  De  Ferrari  24/R  -  Genova 
ALFASOFT  SAS  -  V.  D.G.  Storace  4/R  -  Sampierdarena 
COMPUTER  LIFE  SNC  -  V.  Trento  Trieste  1  -  Ventimiglia 
COOP.  LIBRARIA  UNIVERSITARIA  -  Salita  Inferiore  della  Noce  10/R  - 
Genova 

GAGGERO  LUIGI  -  P.zza  Cinque  Lampadari  63/65R  -  Genova 
PAGLIALUNGA  S.D.T.  -  V.  Mazzini  4  -  Rapallo 
R  &  R  ELETTRONICS  -  V.  F.lli  Canepa  94  -  Serrà  Ricco 
SCK  COMPUTER  SNC  -  V.  Piave  78/R  -  Savona 
UN.EL.CO  di  Crespi  e  Corte  -  V.  Roma  146  -  Sanremo 


LOMBARDIA 

2  M  ELETTRONICA  SRL  -  V.  Sacco  3  -  Como 

ABC  INTERNATIONA  SRL  -  V.  C.  Battisti  21  -  Albiate  Brianza 

A.I.S.  INTERNATIONAL  SRL  -  V.  Madonnina  33  -  Agrate  Brianza 

ANTICA  CASA  MUSICAL  SNC  -  V.  G.  Verdi  31  -  Bergamo 

BERNASCONI  MARIO  &  C.  -  V.  A.  Saffi  88  -  Varese 

BIT  84  SAS  -  V.  Italia  4  -  Monza 

BOSONI  -  P.zza  Tricolore  2  -  Milano 

COMPUTER  &  C.  SNC  -  P.zza  Indipendenza  4  -  Seregno 

COMPUTER  HOUSE  -  V.  Maffei  11/A  -  Sondrio 

COMPUTER  LINE  SRL  -  V.  Maroncelli  12  -  Milano 

COMPUTER  SHOP  -  V.  A.  da  Brescia  2  -  Gallarate 

COMPUTER  SHOP  -  V.  Vittorio  9  -  Capriate  S. 

COMPUTER  STUDIO  SNC  -  V.  Einaudi  13  -  S.  Antonio  P 
COMPUTER  &  GRAPHICS  -  V.  Antica  Regina  173  -  Domaso 
DELTRON  SRL  -  V.le  Gran  Sasso  50  -  Milano 
DISCOUNT  MUSIC  CENTER  SRL  -  V.le  Monza  16  -  Milano 
DOZIO  SYSTEM  -  V.  Marco  D'Oggiono  11/A  -  Lecco 
EDELKTRON  -  P.zza  Pattari  2  -  Milano 


EDS  COMPUTERS  SRL  -  C.so  Porta  Ticinese  4  -  Milano 
ELETTRONICA  INDUSTRIALE  -  V.  S.  Pellico  -  Villongo 
ELETTRONICA  SESTESE  -  V.  Boccaccio  178/180  -  Sesto  S.G. 
EMI  COMPUTER  -  V.  Azzone  Visconti  39  -  Monza 
EVERY  F.H.  SRL  -  V.  Vitruvio  3  -  Milano 
GBC  ITALIANA  SPA  -  V.le  Matteotti  66  -  Cinisello  B. 

GIGLIONI  SRL  -  V.le  Don  Sturzo  45  -  Milano 
HEX  ELECTRONICS  SAS  -  V.le  Jenner  16  -  Milano 
IL  DATO  di  Noris  Maria  -  V.  Provinciale  66/E  -  Albino 
IL  PAPIRO  -  V.  Trento  18  -  Toscolano  M. 

INFORMATICA  2000  SRL  -  V.le  Stazione  16/C  -  Brescia 
INFORMATICA  SERVICE  -  V.  Negroli  26/2  -  Milano 
L'AMICO  DEL  COMPUTER  -  V.  Castellini  25  -  Melegnano 
LECCOLIBRI  LIBRERIA  FUMAGALLI  -  V.  Cairoli  48  -  Lecco 
LOGICAL  STATION  3001  SRL  -  V.  delle  Asole  2  -  Milano 
MANTOVANI  TRONIC’S  -  V.  Caio  Plinio  11  -  Como 
MARCUCCI  SPA  -  V.  F.lli  Bronzetti  3/A  -  Milano 
MICROTHERMIK  SAS  -  V.le  Rimembranze  93  -  Sesto  S.G. 
MONITOR  ELECTRONICS  -  V.  De  La  Salle  10  -  Milano 
MOUSE  SRL  -  V.  Volta  11  -  Seregno 
MULTISYSTEM  SAS  -  V.  Aurora  6  -  Cinisello  B. 

MUSIC  POOL  SOC.  COOP.  SRL  -  V.  Archimede  22  -  Milano 

MUSIC  TECHNOLOGY  SRL  -  V.  C.  Colombi  12  -  Milano 

NEBEL  ELECTRONICS  SRL  -  V.  V.  Emanuele  65  -  Vimercate 

NEW  GAME  SNC  -  C.so  Garibaldi  199  -  Legnano 

NUOVA  NEWEL  ELETTRONICA  SAS  -  V.  Mac  Mahon  75  -  Milano 

POLLI  SRL  -  V.  Martiri  Libertà  103  -  Lissone 

PRISMA  SNC  -  V.  Ghisleri  55  -  Cremona 

REPORTER  SNC  -  C.so  Garibaldi  25  -  Cremona 

RIVOLA  SNC  -  V.  Vitruvio  43  -  Milano 

SENNA  G.  FRANCO  &  C.  SNC  -  V.  Calchi  5  -  Pavia 

SIGMA  SAS  -  V.  Canelli  25  -  Milano 

SONDRIO  COMPUTER  SAS  -  V.  Mazzini  44  -  Sondrio 

SUPER  GAMES  SAS  -  V.  Vitruvio  38  -  Milano 

TECNOTRON  di  lannucci  -  V.  Breda  274  -  Fara  Gera  D. 

TINTORI  -  V.  Brosetta  1  -  Bergamo 


PIEMONTE 


CASA  MUSICALE  SCA  -  V.  Ormea  66  -  Torino 
COMPUTER  SHOP  SAS  -  V.  Nizza  9  -  Torino 
COMPUTING  SRL  -  P.zza  Risorgimento  -  Vercelli 
EMMESOFT  -  V.  A.  Alberti  -  Torino 
RECORD  -  C.so  Alfieri  1  -  Asti 
ROSSI  COMPUTERS  SNC  -  C.so  Nizza  42  -  Cuneo 
SUONO  -  V.  Po  40  -  Torino 
TEOREMA  SRL  -  V.le  Losanna  -  Biella 


PUGLIA 


AMORE  COMPUTER  -  V.  Cavalieri  di  Malta  59/61  -  Putignano 

ARTEL  -  V.  Fanelli  206/16  -  Bari 

ARTEL  -  V.  Palete  3/7  -  Modugno 

BIBO  SYSTEM  -  P.zza  S.  Angelo  13  -  Manduria 

CARTOLIBRERIA  RIZ  -  V.le  Luigi  Sturzo  49  -  Bari 

COMPUTERÀ  ARTS  I  -  V.  Regina  Elena  101  -  Taranto 

DISCORAMA  SRL  -  C.so  Cavour  99  -  Bari 

EDZ  di  Nicola  Zuc  -  V.  Umberto  I  20  -  Pulsano 

ELECTRONIC  SYSTEM  -  V.  Nizza  21/25  -  Castellana 

ELIOSTATI  -  V.  Re  David  177/11  -  Bari 

EVERY  WARE  COMPUT  -  V.le  Commenda  21  -  Brindisi 

H  &  S  di  Marone  M  -  V.  Salomone  56  -  Foggia 

MONDIAL  SOUND  -  V.  Giulio  Petroni  48  -  Bari 

MUSICA  UNO  SERVICE  -  V.  Cap.  Magrone  62  -  Moffetta 

TECNO  UFFICIO  SNC  -  P.zza  Giovanni  XXIII  10  -  Gallipoli 
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SARDEGNA 


AUDIO  LINEA  SAS  -  V.le  Mameli  60  -  Sassari 
BAJARDO  CARTOLERIA  -  V.  Italia  16  -  Sassari 
BIT  SHOP  di  Vera  Conti  e  C.  -  V.  Zagabria  47  -  Cagliari 
CGSI  SAS  -  V.  Puccini  4  -  Tempio  Pausania 
COMOS  SRL  -  V.  Trieste  57  -  Selargius 
CSI  SRL  -  V.  Satta  8/12  -  Carbonia 
FRONGIA  MARIO  -  V.  Sonnino  94  -  Cagliari 
IL  COMPUTER  SNC  -  V.  Ricovero  42  -  Oristano 
INF.  TEL.  di  Bracci  e  C.  -  V.  Pergolesi  298  -  Cagliari 
SAREL  di  Manca  -  V.  Manzoni  12/14  -  Nuoro 
SISTEM’S  ROOM  SNC  -  P.zza  Civica  27  -  Alghero 
TELE  SARDA  -  V.  Roma  62/H  -  Olbia 


SICILIA 


AM  VIDEO  TV  -  C.so  Pisani  312  -  Palermo 

AP  ELETTRONICA  -  V.  Noto  36/38  -  Palermo 

BENEDETTO  RICCARDO  -  V.  Asti  18  -  Patti 

BIT  ELETTRONICA  -  V.  Siracusa  30  -  Palermo 

BIT  INFORMATOCA  -  V.  Gaspare  Romano  21  -  Mazzara  del  Vallo 

C.H.C.  -  V.  Canfora  122  -  Catania 

C.H.M.  -  V.  Del  Vespro  58  -  Messina 

CENTRO  INFORMATICA  2000  -  V.  Quieti  7  -  Trapani 

CINEVISION  -  V.  Palazzi  179  -  Gela 

COMPUTER  SHOP  -  V.le  Orlando  164  -  Catania 

COMPUTER  SOFT  CENTER  -  V.  S.  Simeone  15  -  Siracusa 

COMPUTERS  SRL  -  C.so  Umberto  81  -  Scicli 

COMPUTIME  -  V.  Statale  15  -  Giammoro 

CONDORELLI  -  V.  Renato  Imbriani  65  -  Catania 

DATACOM  -  V.  Pietro  Nenni  26  -  Agrigento 

DONZELLA  GIUSEPPE  -  V.  Statale  81  -  Ispica 

ELECTRONIC  di  Ciccolò  -  V.  Roma  91  -  Barcellona 

ELECTRONIC  CENTER  -  V.  Renato  Imbriani  64  -  Catania 

FERRAUTO  -  C.so  Umberto  233  -  Caltanissetta 

GUCCIONE  MARIA  -  V.  San  Biagio  79  -  Comiso 

INFRUTTUOSO  PASQUALE  -  V.  Vitt.  Emanuele  39  -  Francofonte 

LA  CARTOTECNICA  -  C.so  Sicilia  59/61  -  San  Cataldo 

LA  MANTIA  -  C.so  Calatafimi  722  -  Palermo 

MELCHIONDA  NAZARIO  -  V.  Simeone  15  -  Siracusa 

MELLEA  SALVATORE  -  V.  Umberto  151  -  Augusta 

MILICI  FRANCESCO  -  C.so  Umberto  24  -  Siracusa 

NUOVA  DIMENSIONE  -  V.  Buganza  11  -  Messina 

PRESTI  GIOVANNI  -  V.  Umberto  162  -  Giardini  Naxos 

TOMA  GIOVANNI  -  V.  Novontuno  1  -  Castelvetra 

UFFICIO  MODERNO  -  V.  N.  Costa  -  Pachino 


TOSCANA 


BOVINI  VASCO  -  V.  L.B.  Alberti  3  -  Arezzo 
CAFF  Centro  HYFY  -  V.  A.  Allori  52  -  Firenze 
CIPOLLA  ANTONIO  -  V.  Veneto  26  -  Lucca 
COMPUTER  LINE  -  V.  G.  di  Vittorio  10  -  Firenze 
COMPUTER  LINE  -  V.  S.  Lavagnini  20  -  Firenze 
ELETT.  CENTO  STELLE  -  V.  Centostelle  5/B  -  Firenze 
ELETTRIC  DREAM  SNC  -  V.  Sette  Soldi  32  -  Prato 
ETRURIA  FILM  di  Perinti  -  Vicolo  dello  Sportello  13  -  Siena 
GIMIGNANI  ROBERTO  -  V.  Romana  92  -  Lucca 
I.C.S.  SRL  -  V.  Garibaldi  46  -  S.  Giov.  Va. 

M.G.  di  Maurri  Gigliola  &  C.  -  V.  Fratelli  23/29  -  Pontassieve 
MUSIC  RAMA  -  V.  D.  Alighieri  17  -  Sesto  Fiorentino 
SABEMA  -  V.  Tosco  Romagnola  42  -  Empoli 


TECNINOVAS  COMPUTERS  SRL  -  V.  Emilia  36  -  Pisa 
TELEINFORMATICA  TOSCANA  -  V.  Bronzino  36  -  Firenze 


TRE  VENEZIE 


ANDRIGHETTI  SILVIO  -  V.  Michiel  5  -  Pieve  di  Sacco 

APL  COMPUTER  SRL  -  V.  Tombetta  35/A  -  Verona 

AREM  SAS  di  Poli  Ivo  &  C.  -  C.so  Cavour  35  -  Verona 

ATRE  di  Arcangeli  &  C.  -  P.le  Firenze  23  -  Bassano  del  Grappa 

B.B.F.  SNC  -  V.  Gramsci  22  -  Rovigo 

BARBOLIN  ELIO  -  V.  Roma  52  -  Campo  S.  Martino 

BIT  COMPUTER  SRL  -  V.  Verdi  8  -  Mestre 

BONTADI  OSCAR  -  P.zza  Verdi  15/B  -  Bolzano 

BRANCALEON  F.LLI  GABBIA  -  V.  S.  Marco  5476  -  Venezia 

BROLLO  ANGELO  -  V.  Alessi  35  -  Gemona  del  Friuli 

CAPUTO  R.  di  Caputo  &  C.  -  V.  S.  Marco  5193  -  Venezia 

CASOTTO  ALBERTO  -  V.le  Stazione  116  -  Montegrotto  Terme 

CBL  COMPUTER  SNC  -  P.za  Mazzini  15  -  Belluno 

CENTRO  SOFTWARE  VENETO  -  V.  Colleoni  30  -  Thiene 

CLINICA  DEL  RASOIO/COMPUTER  -  V.  Fiume  33  -  Rovigo 

COMPUTER  B.  COSTO  di  Rossi  -  V.  Del  Costo  34  -  Thiene 

COMPUTER  LINE  -  V.  C.  Battisti  38  -  Padova 

COMPUTER  POINT  di  D’Andrea  -  V.  Roma  63  -  Padova 

COMPUTIGI  di  L.  Orel  -  V.le  XX  Settembre  55/A  -  Trieste 

CORO  ALDO  -  V.  Roma  81  -  Spinea 

ELCOM  di  Segatti  Claudia  -  C.so  Italia  149  -  Gorizia 

FERCASA  SNC  -  V.  Calnova  40  -  S.  Donà  di  Piave 

FOX  ELETTRONICA  -  V.  Maccani  36/5  -  Trento 

FRANCOMPUTER  -  C.so  Fogazzaro  139  -  Vicenza 

GOLFETTO  GIOVANNI  -  V.  Desman  149  -  S.  Maria  Sala 

HOBBY  ELETTRONICA  di  Casale  -  V.  Caboto  24  -  Pordenone 

HS  COMPUTER  -  V.  Cantarane  63/C  -  Verona 

IL  GIOCATTOLO  2  -  V.  Mercato  Vecchio  29  -  Udine 

MAZZUCCATO  OTTAVIO  -  V.  G.  Galilei  113  -  Albignasego 

MICROTEC  SRL  -  V.  Sarnes  7  -  Bressanone 

MITHO  SRL  -  V.le  Porpetto  11  -  Ugnano  Sabbiadoro 

MOFERT  SNC  di  Morvile-Feula  -  V.le  Europa  Unita  41  -  Udine 

MOLON  SERGIO  -  V.  F.  D'Acquapendente  -  Padova 

PALESA  GIORGIO  -  V.  Calmaggiore  10  -  Treviso 

PARADISO  DEL  BAMBINO  -  V.  Umberto  I  20  -  Oderzo 

PERSONAL  WARE  -  V.  Del  Pontiere  2  -  Verona 

QUAGGIÙ  ACHILLE  -  V.  Veneto  124  -  Campolongo  Magg. 

RADIOFONIA  -  V.  C.  Battisti  43  -  Cortina  D’Ampezzo 

RIGO  SERGIO  -  C.so  Vittorio  Emanuele  33  -  Pordenone 

RTE  di  Nicolini  &  C.  -  V.  Galvani  32  -  Valdagno 

SAVING  COMPUTER  SRL  -  V.le  Gramsci  -  Mirano 

SIDE  STREET  -  V.  S.  D’Acquisto  8  -  Montebelluna 

TALAMINI  LIVIO  &  C.  Sdf  -  V.  Garibaldi  2  -  Treviso 

TECHNOLOGY  COMPUTER  HOUSE  -  Riva  Vena  889  -  Chioggia 

TECNO  DELTA  Sdf  -  V.  Nordio  9  -  Trieste 

TECNO  POWER  COMPUTER  SHOP  -  V.  S.  Giacomo  30  -  Monfalcone 

TELMA  ELETTRONICA  SNC  -  V.  Feltre  244/B  -  Belluno 

TESTI  FERRUCCIO  SAS  -  Cà  Stimabile  30  -  Padova 

UP  TO  DATE  di  Viel  Renzo  -  V.  Vittorio  Veneto  43  -  Belluno 

ZATTARIN  GET  SRL  -  V.  M.  Polo  43  -  Mestrino 

ZELLA  ADELIO  -  P.zza  De  Gasperi  31/A  -  Padova 

ZUCCATO  SRL  -  C.so  Palladio  78  -  Vicenza 


UMBRIA 


C.S.E.  -  V.  Garibaldi  3  -  Terni 

COMPUTER  HOME  -  V.le  Trento  e  Trieste  67  -  Spoleto 

LIBRERIA  LA  FONTANA  -  C.so  Vannuggi  22  -  Perugia 

MICROCOGIT  -  V.  Filosofi  24  -  Perugia 

RAGNI  RITA  -  P.zza  XXV  Aprile  31  -  Umbertide 

RASTELLI  -  V.  Baglioni  17  -  Perugia 

SERLUBINI  -  V.  S.  Rocco  22  -  Bastia 

SUPER  ELETTRONICA  -  V.  del  Leone  3  -  Terni 
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DISTRIBUTORI 


UMBRIA 

HARD  &  SOFT  Via  Bolzello  2  -  05100  Terni  -  Tel.  0744-451152 

LOMBARDIA 

CONSOLO  &  LONGONI  S.P.A.  Viale  Dell’Industria  63  -  20037  Pader- 
no  Dugnano  (MI)  -  Tel.  02-9183372  -  Fax  02-9184083 
EDELEKTRON  Piazza  Pattari  2  -  20122  Milano  -  Tel.  02-800444 

PIEMONTE 

GRUPPO  SISTEMI  TORINO  Via  Reiss  Romoli  122/9  -  10126  Torino  - 
Tel.  011-2202651 

TRE  VENEZIE 

INTERSERVICES  S.R.L.  Via  S.  Pietro  58/A  -  35100  Padova  -  Tel. 
049-655654 

TOSCANA 

TELEINFORMATICA  TOSCANA  Via  Bronzino  36  -  50142  Firenze  -  Tel. 
055-714884 

LAZIO 

ALFA  LEASING  S.R.L.  Via  llliria  18  -  00183  Roma  -  Tel.  06-7597701 
APC  Via  Catalani  23  -  00199  Roma  -  Tel.  06-8392646  -  9393438 
DISITACO  -  Via  Ardia  60  -  00199  Roma  -  Tel.  06-8440766  -  857607 

CAMPANIA 

LADA  S.R.L.  Via  F.  Imparato  33  -  80146  S.G.  Ateduccio  (NA) 

PUGLIA 

R.V.F.  S.R.L.  Corso  Cavour  96  -  70121  Bari  -  Tel.  080-544651  - 
545309 

SICILIA 

BELCO  S.R.L.  Via  Mariano  D’Amelio  -  90143  Palermo  -  Tel.  091  - 
547566 

ITALSOFT  S.R.L.  Via  Dott.  Palazzolo  -  9401 1  Agira  (EN)  -  Tel.  0935- 
692560 


ASSISTENZA  1KNKA 


HI-FI  OKAY  S.R.L.  Via  Conchetta  4  -  20136  Milano  -  Tel.  02- 
8394906 

BENATO  ALESSANDRO  Via  F.  Zonaro  15  -  35132  Padova  -  Tel  049- 
612508 


BERTI  RUDI  Via  Danine  21/c  -  40121  Bologna  -  Tel.  051-442151 
GENERAL  COMPUTER  S.A.S.  Via  Fieravecchia  26  -  84100  Salerno  - 
Tel.  089-237835 

TECNE  S.N.C.  Via  Andrea  di  Sernia  31  -  80123  Napoli  -  Tel.  081- 
7612299 

D.C.S.  ITALIA  S.R.L.  Via  Arbia  60  -  00199  Roma  -  Tel.  06-867742 
ITALSOFT  Via  Dott.  Palazzolo  -  Agira  (Enna)  -  Tel.  0935-692560 
COMPUTER  SERVICES  S.N.C.  Via  Reiss  Romoli  122/11  -  10126 
Torino  -  Tel.  011-2202666 

ALFA  LEASING  S.R.L.  Via  llliria  18  -  00183  Roma  -  Tel.  06-7597701 
TELEINFORMATICA  TOSCANA  Piazza  Pier  Vettori  1  -  50142  Firenze  - 
Tel.  055-227991 

HARD  &  SOFT  Via  Bolzello  2  -  05100  Terni  -  Tel.  0744-451152 
H  &  S/C  &  C  di  Morene  Via  Salomone  56  -  71100  Foggia -Tel.  0881  - 
24130 

G.  SAT  di  Grassi  Zona  Industriale  Predda  N.  -  07100  Sassari  -  Tel. 
079-260477 

R.V.F.  S.R.L.  Corso  Cavour  96  -  70121  Bari  -  Tel.  080-545309 
MIDEL  di  Boiani  Via  Galvani  15  - 16100  Genova  Sestri  Ponente  -  Tel. 
010-677022 

C.H.M.  S.R.L.  Via  del  Vespro  58  -  98100  Messina  -  Tel.  090-719254 


AGENTI 


EMILIA  ROMAGNA 

GIANNASI  MARCO  Via  Passo  Buole  2  -  Reggio  Emilia  -  Tel.  0522- 
294805 

TOSCANA 

PRESENTINI  GIANCARLO  Via  Medici  2  -  Terranova  Braccionini  (AR)  - 
Tel.  055-973151 

LAZIO 

RICCI  LUIGI  Via  F.  Inghirani  10  -  Roma  -  Tel.  06-6237040 

CAMPANIA  E  CALABRIA 

ERMES  Via  S.  Luca  50  -  80132  Napoli  -  Tel.  081-402419 

LIGURIA 

R  &  R  Via  F.lli  Canepa  94  -  16010  Serra  Ricco  (GE)  -  Tel.  010- 
750729  -  750866  -  752041  -  752051 

SARDEGNA 

GRASSI  GIORGIO  Zona  Industriale  Predda  Niedda  -  07100  Sassari  - 
Tel.  079-260477 

PIEMONTE 

MARDUE  -  Via  Monbasilio  62  -  10136  Torino  -  Tel.  011-3290769  - 
328363 


rum 

I  PREZZI 

DEGÙ 

ATARI 


CENTRI 

SPECIALIZZATI 
DI  ASSISTENZA 


HI-FI  OKAY  S.R.L.,  Via  Con- 
chetta  4,  20136  Milano,  02- 
8394906 

RENATO  ALESSANDRO, 

Via  F.  Zonaro  15,  35132  Pa¬ 
dova,  049-612508 

BERTI  RUDI,  Via  Dagnine 
21/c,  40121  Bologna 

TECNE  S.n.c.,  Via  d'Isernia 
31,  80132  Napoli,  081- 

7612299 

D.C.S.  ITALIA  S.R.L.,  Via 

Arbia  60,  00199,  Roma 

ITALSOFT,  Via  Doti.  Palaz- 
zolo,  Agira,  Enna ,  0935- 
692560 

COMPUTER  SERVICES 

S.n.c.,  Via  fìeiss  Romoli 
122/11,  10126  Torino,  011- 
2202666 

ALFA  LEASING  S.R.L.,  Via 

llliria  18,  00100  Roma,  06- 
7597701 

TELEINFORMATICA  TO¬ 
SCANA,  P.za  Pier  Vettori  1, 
50142  Firenze,  055-227991 

HARD  &  SOFT,  Via  Bolzello 
2,  05100  Terni,  0744-46658 

H  &  S/C  &  C  di  Morone,  Via 
Salomone  56,  Foggia,  0881- 
24130 

ORE  di  Grassi,  Zona  Indu¬ 
striale  Fredda  N.,  07100 
Sassari,  079-260477 

R.V.F.  S.R.L.,  Corso  Cavour 
96,  70121  Bari,  080-545309 

MIDEL  di  Boiani,  Via  Galvani 
15,  16154  Genova,  010- 

620602 


520STm 

Computer  512Kbyte  RAM,  192Kbyte  ROM,  Mouse  e 

Modulatore  TV 

lire 

540.000 

1 040STf 

Computer  1Mbyte  RAM,  192Kbyte  ROM,  Mouse  e  floppy 
doppia  faccia  720Kbyte  (formattati)  incorporato  . 

lire  1 .090.000 

i 

SF354 

Disk  drive  500Kbyte  (360Kbyte  formattati) 

lire 

250.000 

1 

SF314 

Disk  drive  1  Mbyte  (720Kbyte  formattati) 

lire 

420.000 

§ 

SMI  24/5 

Monitor  monocromatico  alta  risoluzione  (640  x  400)  . 

lire 

295.000 

i 

SCI  424 

Monitor  a  colori  RGB  . 

lire 

590.000 

g 

SMM804 

Stampante  a  matrice  d’aghi  80  caratteri  . 

lire 

420.000 

IAI 

SH204 

Hard  disk  20Mbyte  (formattato) 

lire 

890.000 

NL-10 

Stampante  STAR  80  colonne  1 20  cps  NLQ  . 

lire 

795.000 

Mouse 

lire 

95.000 

TOS  ROM  Kit  ROM  per  ST  . 

lire 

95.000 

_ 

5 

i 

1 

Al  00 

Kit  comprendente 

520STm  Computer  512Kbyte  RAM,  192Kbyte  ROM,  Mouse  e 
Modulatore  TV 

SF354  Disk  drive  500  Kbyte  (360  Kbyte  formattati) 

lire 

790.000 

A400 

Kit  comprendente 

1040STf  Computer  1  Mbyte  RAM  ,  192Kbyte  ROM,  Mouse  e  flop¬ 
py  doppia  faccia  720Kbyte  (formattati)  incorporato 

SMI  424  Monitor  monocromatico  alta  risoluzione  . 

lire  1.290.000 

£ 

A450 

Kit  comprendente 

1040STf  Computer  1  Mbyte  RAM  ,  192Kbyte  ROM,  Mouse  e  flop¬ 
py  doppia  faccia  720Kbyte  (formattati)  incorporato 

SCI  424  Monitor  RGB  Thomson/Atari 

lire  1 .540.000 

_ 

130XE 

Computer  1 28Kbyte  RAM,  32Kbyte  ROM 

lire 

199.000 

XC12 

Registratore  a  cassette 

lire 

59.000 

Al  050 

Disk  drive  . 

lire 

199.000 

i 

Al  029 

Stampante  a  matrice  d’aghi 

lire 

199.000 

I 

8 

ftAI 

Al  027 

Stampante  di  qualità 

lire 

189.000 

Al  020 

Stampante  Plotter  4  colori 

lire 

99.000 

| 

CX77 

Tavoletta  grafica  . 

lire 

79.000 

AX130/1 

Kit  comprendente  130XE  computer  128Kbyte  RAM,  32Kbyte  ROM 
XC 1 2  Registratore  a  cassette 

lire 

249.000 

AX 130/2 

Kit  comprendente  130XE  Computer  128Kbyte  RAM,  32Kbyte  ROM 
A  1 050  Disk  drive  . 

lire 

359.000 

_ 

Su 

JR2600 

Video  gioco  . 

lire 

84.000 

| 

CX24 

Super  controller  . 

lire 

14.500 

5 

_5_ 

Cartucce  .  a  partire  da  lire 

lire 

9.000 

66 


Macintosh 


Commodore 


olivelli 


PERSONAL  COMPUTER 


PRODEST 


, oppia  I? 


1 


AMIGA 

PHILIPS 


olivelli  AATARI  Sinclair 


Libri,  riviste 
e  software,  dedicati 


Dedicati  al  tuo  computer  preferito,  ma  soprattutto 
dedicati  a  te!  Perchè  Jackson  è  l'unico  editore  in  Italia 
a  offrire  una  gamma  assolutamente  unica  di  prodotti, 
perfettamente  complementari  tra  loro  e  orientati  alle 
esigenze  più  specifiche  e  più  svariate. 

Solo  Jackson  pubblica  riviste  interamente  dedicate  a 
un  numero  così  elevato  di  personal  e  home  compu¬ 
ter,  tra  i  più  diffusi  sul  mercato,  a  cui  associa  manuali 
tecnici,  libri,  corsi  interattivi,  pro¬ 
grammi  di  gioco  e  di  utilità,  nel-  i 
l'intento  di  dare  sempre  l'informa-  | 
zione  più  chiara,  pur  con  diffe-  | 
renti  livelli  di  approfondimento. 

Jackson  ti  permette  così  di  sce¬ 
gliere  il  prodotto  editoriale  più 


adatto  alle  tue  reali  necessità  applicative. 

Non  solo.  In  alcuni  casi,  Jackson  anticipa  letteralmen¬ 
te  il  mercato,  proponendo  al  lettore  riviste  e  libri  de¬ 
dicati  a  particolari  famiglie  di  personal  computer,  in 
contemporanea  con  il  loro  annuncio! 

Perchè  solo  Jackson  ha  l'organizzazione  e  il  know- 
how  necessari  per  produrre  editoria  tecnica  ai  più 
elevati  gradi  di  professionalità. 

Se  vuoi  saperne  di  più  e  mante¬ 
nerti  informato  sulle  novità  de¬ 
dicate  al  computer  da  te  utiliz¬ 
zato,  compila  e  spedisci  in  bu¬ 
sta  chiusa  il  personal-tagliando 
pubblicato  in  questa  pagina. 

/^GRUPPO  EDITORIALE 

f?  JACKSON 


Compilare  e  spedire  in  busta  chiusa  a: 

GRUPPO  EDITORIALE  JACKSON 
via  Rosellini  12  -  20124  MILANO 

□  Desidero  ricevere  il  programma 
abbonamento  riviste  JACKSON 
□  Desidero  ricevere  il  catalogo  libri  JACKSON 
□  Desidero  ricevere  il  catalogo  libri  scolastici  JACKSON 
□  Desidero  ricevere  il  programma  dei  corsi 
JACKSON  SATA 

NOME _ 


COGNOME . 
INDIRIZZO. 
CAP _ 


CITTÀ  . 


PROV. 


\  COMPUTER  USATO  _ 


□  PER  LAVORO  □  PER  HOBBY 


Da  oggi  Atari  gioca  duro  ! 


ATAR1 1040.  Tecnologia  folte,  prezzo  vincente. 


IL 


Prima  non  c'era.  Adesso  ce. 
È  il  nuovo  Atari  1040:  la  risposta  Atari  ai  Personal  Computer  che  si  facevano  forti 
solo  del  prezzo.  Oggi  tutti  possono  avere  un  computer  serio  a  un  prezzo  da  ride¬ 
re.  Infatti  il  1040  vi  offre  1  milione  di  bytes  di  memoria,  il  Mouse,  un  monitor  dalla 
definizione  strabiliante  (680  x  400  punti),  tre  generatori  di  suono  e  una  monta¬ 
gna  di  programmi  che  hanno  già  superato  l’esame  di  milioni  di  utenti.  E  tutto  que¬ 
sto  a  molto  meno  di  quanto  osereste  pensare.  Solo  Ut.  1.290.000  con  monitor  in 
bianco  e  nero  ad  alta  risoluzione  e  Ut.  1.540.000  con  monitor  a  colori.*  Da  oggi 
Atari  gioca  duro  per  vincere.  Fate  i  vostri  conti  e  poi  scegliete  con  chi  schierarvi. 

*I.VA  esclusa. 

Il  computer  comprende  le  seguenti  specifiche: 
1040  Kb  RAM,  192  Kb  ROM  con  sistema  opera¬ 
tivo,  Disk-drive  da  720  Kb  (formattati).  Interfac¬ 
ce:  seriale,  parallela,  mouse,  joystick,  floppy 
disk,  hard  disk,  MIDI. 


i  I m 


ATARI  ITALIA  S.p.A.  -  Via  dei  Lavoratori,  25 
20092  Cimsello  Balsamo  (MI)  -  Tel.  (02)  6120851  -  Tlx  325832 


Per  richiesta  nominativi,  agenti  e  distributori  rivolgersi  a  ATARI  ITALIA  s.p.a. 


